14 lines
262 B
R
14 lines
262 B
R
library(phyloseq)
|
|
|
|
# data("GlobalPatterns")
|
|
|
|
gp_tree <- phy_tree(GlobalPatterns)
|
|
plot(gp_tree, show.node.label = FALSE, show.tip.label = FALSE)
|
|
gp_tree$node.label
|
|
gp_tree$edge.length
|
|
gp_tree$edge
|
|
|
|
|
|
simple_tree <- list()
|
|
class(simple_tree) <- "phylo"
|
|
simple_tree
|