add_strip | R Documentation |
add strips for a tree plot
add_strip(trp, some_tax, flat_n = 5, strip_params = NULL)
trp |
tree plot from |
some_tax |
some tax you want to add strip |
flat_n |
flat the text when taxa number more than |
strip_params |
parameters parse to |
tree plot
data(otutab, package = "pcutils")
# run yourself
if (interactive()) {
ann_tree(taxonomy, otutab) -> tree
easy_tree(tree) -> p
some_tax <- table(taxonomy$Phylum) %>%
sort(decreasing = TRUE) %>%
head(5) %>%
names()
add_strip(p, some_tax)
}
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.