tests/testthat/test.R

testthat::test_that("covfefefy produces proper results",{
  testthat::expect_equal(covfefy("coverage"),"covfefe")
  testthat::expect_equal(covfefy("example"),"exxaxa")
  testthat::expect_equal(covfefy("programming"),"progkaka")
  testthat::expect_equal(covfefy("president"),"preszizi")
})

Try the covfefe package in your browser

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

covfefe documentation built on May 2, 2019, 5:52 a.m.