tests/testthat/test_hist.R

test_that("Testing hist", {
  context("histograms")
  testthat::skip_on_ci()
  testthat::skip_on_cran()
  set.seed(1)
  x = rlnorm(100)
  expect_doppelganger("hist basic", hist_p(x))
  expect_doppelganger("hist density", hist_p(x, freq = FALSE))
  expect_doppelganger("hist labels",
                              hist_p(x, xlab = "X", ylab = "Y",
                                   main = "Main", sub = "Sub"))

})

Try the prettyB package in your browser

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

prettyB documentation built on Feb. 10, 2021, 5:11 p.m.