R/catEffectBootAdaptor.R

catEffectBootAdaptor<-function (df, index, testFnc = sumSqCat, useResp = TRUE, ...) {
    if (useResp) respVal <- df$resp
    else respVal <- df$bkg
    testFnc(respVal[index], df$cat, ...)
}

Try the PsumtSim package in your browser

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

PsumtSim documentation built on May 1, 2019, 8:03 p.m.