powered by
evalSubFormula(x, data = NULL, ops = c("+", "&"), env = parent.frame())
x
data
if (require(mosaicData)) { data(CPS85) cps <- CPS85[1:6,] cps evalSubFormula( rhs( ~ married & sector), data=cps ) }
Run the code above in your browser using DataLab