tests/testthat/test_vignette.R

context("Vignette exists")
library(platowork)

test_that("vignette, testing-platoworks, exists", {
  expect_equal(class(utils::vignette("testing-platowork")), "vignette")
})
#> Test passed

Try the platowork package in your browser

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

platowork documentation built on May 4, 2021, 9:06 a.m.