tests/testthat/test-distribution_plot_2.R

context("histogram_plot")


test_that("plot works", {

  g = histogram_plot(mtcars, "mpg")

  expect_equal(nrow(g$data), 32)

})



context("density_plot")


test_that("plot works", {

  g = density_plot(mtcars, "mpg")

  expect_equal(nrow(g$data), 32)

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