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)

})

Try the ezplot package in your browser

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

ezplot documentation built on Nov. 26, 2023, 5:07 p.m.