Mercurial > repos > artbio > mutational_patterns
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 } |