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"]])))

})
wkostelecki/ezplot documentation built on Feb. 1, 2024, 10:58 p.m.