comparison mutational_patterns.R @ 12:6d49ca864866 draft default tip

planemo upload for repository https://github.com/ARTbio/tools-artbio/tree/master/tools/mutational_patterns commit bc7fab3050541155f0c3e15b7f448a1802155670
author artbio
date Tue, 12 Jul 2022 17:43:30 +0000
parents a4e26bcf285c
children
comparison
equal deleted inserted replaced
11:a4e26bcf285c 12:6d49ca864866
487 xlab("") + 487 xlab("") +
488 # Reverse order of the samples such that first is up 488 # Reverse order of the samples such that first is up
489 # xlim(rev(levels(factor(cos_sim_ori_rec$sample)))) + 489 # xlim(rev(levels(factor(cos_sim_ori_rec$sample)))) +
490 theme_bw() + 490 theme_bw() +
491 theme(panel.grid.minor.y = element_blank(), 491 theme(panel.grid.minor.y = element_blank(),
492 panel.grid.major.y = element_blank()) + 492 panel.grid.major.y = element_blank(),
493 axis.text.x = element_text(angle = 90, vjust = 0.5, hjust = 1)
494 ) +
493 # Add cut.off line 495 # Add cut.off line
494 geom_hline(aes(yintercept = .95)) 496 geom_hline(aes(yintercept = .95))
495 grid.arrange(p9, top = textGrob("Similarity between true profiles and profiles reconstructed with elementary signatures", gp = gpar(fontsize = 12, font = 3))) 497 grid.arrange(p9, top = textGrob("Similarity between true profiles and profiles reconstructed with elementary signatures", gp = gpar(fontsize = 12, font = 3)))
496 dev.off() 498 dev.off()
497 } 499 }