Mercurial > repos > dfornika > render_tree
comparison render_tree.R @ 0:342fe8c2d8bb draft
planemo upload for repository https://github.com/dfornika/galaxytools/tree/master/tools/render_tree commit 8898f2229ec13917b7d96e20725f3871d9d93e90-dirty
| author | dfornika |
|---|---|
| date | Sat, 29 Jun 2019 00:13:08 -0400 |
| parents | |
| children | 9f0241ee55e8 |
comparison
equal
deleted
inserted
replaced
| -1:000000000000 | 0:342fe8c2d8bb |
|---|---|
| 1 #!/usr/bin/env Rscript | |
| 2 | |
| 3 suppressMessages( | |
| 4 library(ggtree) | |
| 5 ) | |
| 6 | |
| 7 args = commandArgs(trailingOnly=TRUE) | |
| 8 | |
| 9 tree <- read.tree(args[1]) | |
| 10 | |
| 11 tree_plot <- ggplot(tree, aes(x, y)) + | |
| 12 geom_tree() + | |
| 13 theme_tree2() + | |
| 14 geom_tiplab() | |
| 15 | |
| 16 suppressMessages( | |
| 17 ggsave(args[2], plot=tree_plot, device="png") | |
| 18 ) |