R/replaceRHSByVariable.R

replaceRHSByVariable <-
function(formula,
                 variable)
{ #++
    replacement <- as.formula(paste('. ~ ', variable, sep = ''))
    formula <- update.formula(formula, replacement)

    return (formula)
}
BERENZ/RISQ documentation built on May 5, 2019, 10:25 a.m.