diff --git a/DESCRIPTION b/DESCRIPTION index 5f527b9..616e229 100644 --- a/DESCRIPTION +++ b/DESCRIPTION @@ -19,12 +19,12 @@ Imports: magrittr, rlang, ggplot2, - scales, jsonlite Suggests: testthat, dplyr, knitr, + scales, rmarkdown, shiny, gapminder, diff --git a/inst/examples/quick-apex.R b/inst/examples/quick-apex.R index 15dbb94..ff5afe4 100644 --- a/inst/examples/quick-apex.R +++ b/inst/examples/quick-apex.R @@ -170,8 +170,3 @@ apex(data = txhousing2, type = "heatmap", mapping = aes(x = date, y = scales::re -quote(scales::rescale(volume)) - -as_name(quote(scales::rescale(volume))) - - diff --git a/tests/testthat/test-parse_df.R b/tests/testthat/test-parse_df.R index f462c63..ff1304e 100644 --- a/tests/testthat/test-parse_df.R +++ b/tests/testthat/test-parse_df.R @@ -44,11 +44,11 @@ test_that("parse_df works with Date/POSIXt", { ) res <- parse_df(x, add_names = TRUE) - expect_is(res[[1]]$date, "character") + expect_is(res[[1]]$date, "JS_EVAL") expect_is(res[[1]]$datetime, "numeric") res <- parse_df(x, add_names = FALSE) - expect_is(res[[1]][[1]], "character") + expect_is(res[[1]][[1]], "JS_EVAL") expect_is(res[[1]][[2]], "numeric") })