%<% {ggtree} | R Documentation |
update tree
pg %<% x
pg |
ggplot2 object |
x |
update by x |
updated ggplot object
Guangchuang Yu
library("ggplot2") nwk <- system.file("extdata", "sample.nwk", package="treeio") tree <- read.tree(nwk) p <- ggtree(tree) + geom_tippoint(color="#b5e521", alpha=1/4, size=10) p %<% rtree(30)