tests/testthat/test_replyr_filter.R

library('replyr')

context("filter")

test_that("test_replyr_filter.R", {
  values <- c('a', 'c')
  d <- data.frame(
    x = c('a', 'a', 'b', 'b', 'c', 'c'),
    y = 1:6,
    stringsAsFactors = FALSE
  )
  replyr_filter(d, 'x', values)

})

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.