|
...
|
...
|
@@ -10,7 +10,7 @@
|
|
10
|
10
|
##' @author Yu Guangchuang
|
|
11
|
11
|
##' @examples
|
|
12
|
12
|
##' library("ggplot2")
|
|
13
|
|
-##' nwk <- system.file("extdata", "sample.nwk", package="ggtree")
|
|
|
13
|
+##' nwk <- system.file("extdata", "sample.nwk", package="treeio")
|
|
14
|
14
|
##' tree <- read.tree(nwk)
|
|
15
|
15
|
##' p <- ggtree(tree) + geom_tippoint(color="#b5e521", alpha=1/4, size=10)
|
|
16
|
16
|
##' p %<% rtree(30)
|
|
...
|
...
|
@@ -32,7 +32,7 @@
|
|
32
|
32
|
##' @export
|
|
33
|
33
|
##' @author Yu Guangchuang
|
|
34
|
34
|
##' @examples
|
|
35
|
|
-##' nwk <- system.file("extdata", "sample.nwk", package="ggtree")
|
|
|
35
|
+##' nwk <- system.file("extdata", "sample.nwk", package="treeio")
|
|
36
|
36
|
##' tree <- read.tree(nwk)
|
|
37
|
37
|
##' p <- ggtree(tree)
|
|
38
|
38
|
##' dd <- data.frame(taxa=LETTERS[1:13],
|
