tests/testthat/test-compare.R

context("compare") # Tests for the "compare" function

dat1 <- c(1,1,1,1,1)
dat2 <- c(1,2,1,1,1)

expect_true(compare(dat1))
expect_false(compare(dat2))
dpritchard/takiwaR documentation built on May 15, 2019, 1:50 p.m.