tests/testthat/test_recode.R

library(dply2)

context("Check Filter")

expect_equal(capture.output(df <- filter2(dplyr::starwars, gender == "female")), 
             c("", "Filtering for gender == \"female\".", "\tRows Dropped: 68"))
akgold/dply2 documentation built on May 30, 2019, 2:07 p.m.