tests/testthat/test-calendar_plot.R

context("calendar_plot")

test_that("runs", {

  g = calendar_plot(tsibbledata::vic_elec, "Time", "Demand", zlim = c(NA, NA))

  expect_true(all(c("x", "y", "facet_x", "facet_y", "z") %in% names(g[["data"]])))

})

Try the ezplot package in your browser

Any scripts or data that you put into this service are public.

ezplot documentation built on May 29, 2024, 4:05 a.m.