Displaying 1 result from an estimated 1 matches for "prname".
Did you mean:
p_name
2010 Jul 28
0
nlme: augPred.lme for factor covariates
...ta frame"))
}
if (is.null(primary)) {
if (!inherits(data, "groupedData")) {
stop(paste(sys.call()[[1]], "without \"primary\" can only be
used with fits of groupedData objects"))
}
primary <- getCovariate(data)
prName <- deparse(getCovariateFormula(data)[[2]])
}
else {
primary <- asOneSidedFormula(primary)[[2]]
prName <- deparse(primary)
primary <- eval(primary, data)
}
# allow for non numeric covariates #
if (!is.null(newprim)) {
newprimary <- n...