tests/testthat/test_replyr_testCols.R

library('replyr')

context("testCols")

test_that("test_replyr_testCols.R", {
  d <- data.frame(x = c(1, 2), y = c('a', 'b'))
  replyr_testCols(d, is.numeric)

})

Try the replyr package in your browser

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

replyr documentation built on Nov. 1, 2019, 7:49 p.m.