@@ -156,7 +156,7 @@ scale_x_ggtree <- function(tree_view, breaks=NULL, labels=NULL) {

 ## ##' @export

 ## ##' @author Guangchuang Yu \url{http://ygc.name}

 ## ##' @examples

-## ##' nwk <- system.file("extdata", "sample.nwk", package="ggtree")

+## ##' nwk <- system.file("extdata", "sample.nwk", package="treeio")

 ## ##' tree <- read.tree(nwk)

 ## ##' p <- ggtree(tree)

 ## ##' d <- matrix(abs(rnorm(52)), ncol=4)

@@ -10,7 +10,7 @@

 ##' @author Yu Guangchuang

 ##' @examples

 ##' library("ggplot2")

-##' nwk <- system.file("extdata", "sample.nwk", package="ggtree")

+##' 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)

@@ -32,7 +32,7 @@

 ##' @export

 ##' @author Yu Guangchuang

 ##' @examples

-##' nwk <- system.file("extdata", "sample.nwk", package="ggtree")

+##' nwk <- system.file("extdata", "sample.nwk", package="treeio")

 ##' tree <- read.tree(nwk)

 ##' p <- ggtree(tree)

 ##' dd <- data.frame(taxa=LETTERS[1:13],