tests/testthat/test-evalFormula.R

context('evalFormula()')


test_that("subset works ", {
  expect_equivalent(
    evalFormula( age ~ sex, data=mosaicData::HELPrct, age > 50 )[1:3],
    evalFormula( age ~ sex, data=subset(mosaicData::HELPrct, age > 50))[1:3] )
})

Try the mosaicCore package in your browser

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

mosaicCore documentation built on Nov. 5, 2023, 9:06 a.m.