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 } |
