tests/testthat/test_viz_zoom.R

test_that("viz_zoom returns ggplot-code", {
  # expect_identical(class(viz_zoom(prepare_data(patientdata))[[1]])[3], 
  #                  "ggproto")
})
gertstulp/ggzcentraal documentation built on May 23, 2022, 1:10 a.m.