diff --git a/README.md b/README.md index 2752cf9..896f700 100644 --- a/README.md +++ b/README.md @@ -55,7 +55,7 @@ If you want to include it as part of your `dplyr` / `magrittr` pipeline, you can ```R library(dplyr) iris %>% - tbl_df() %>% + as_tibble() %>% filter( Sepal.Width > 3 ) %>% rpivotTable() ``` diff --git a/tests/testthat/test_data.R b/tests/testthat/test_data.R index 0d96397..5175d63 100644 --- a/tests/testthat/test_data.R +++ b/tests/testthat/test_data.R @@ -20,7 +20,7 @@ test_that("data is not changed",{ rpivotTable( data.frame(x=1:10,y=LETTERS[1:10]) )$x$data , data.frame(x=1:10,y=LETTERS[1:10])) expect_is( - rpivotTable(tbl_df(iris))$x$data + rpivotTable(as_tibble(iris))$x$data , "tbl_df" ) expect_identical( diff --git a/vignettes/rpivotTableIntroduction.Rmd b/vignettes/rpivotTableIntroduction.Rmd index 6726866..9ca257c 100644 --- a/vignettes/rpivotTableIntroduction.Rmd +++ b/vignettes/rpivotTableIntroduction.Rmd @@ -104,7 +104,7 @@ Or if you want to include it as part of your `dplyr` / `magrittr` pipeline, you library(dplyr) # ) iris %>% -tbl_df %>% +as_tibble %>% filter( Sepal.Width > 3 & Sepal.Length > 5 ) %>% rpivotTable(rows="Sepal.Width", rendererName="Treemap") ```