First script for tree sampling
This commit is contained in:
parent
354ee4d528
commit
eca2c0198c
1 changed files with 14 additions and 0 deletions
14
progressive-tree-sampling.R
Normal file
14
progressive-tree-sampling.R
Normal file
|
|
@ -0,0 +1,14 @@
|
|||
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
|
||||
Loading…
Add table
Reference in a new issue