Displaying 3 results from an estimated 3 matches for "asoneformula".
2013 Sep 30
1
predictions in nlme without fixed covariantes
Dear all,
predict.lme() throws an error when the fixed part consists of only an intercept and using newdata. See the reproducible example below. I've tracked the error down to asOneFormula() which returns in this case NULL instead of a formula. Changing NULL instead of ~1 in that function (see below) solves the problem in the case of an intercept only model (m1). It does not solve the problem in case of a model without intercept nor covariates (m2). The package with altered asOneForm...
2004 Oct 28
0
Auxilliary args in gls
...or of a
different length. How can this be done?
The gls() code suggests it may be difficult to keep the auxillary arg
out of the model.frame but in the evaluation frame of the formula:
glsSt <- glsStruct(corStruct = correlation, varStruct =
varFunc(weights))
mfArgs <- list(formula = asOneFormula(formula(glsSt), model,
groups), data = data, na.action = na.action)
if (!missing(subset)) {
mfArgs[["subset"]] <- asOneSidedFormula(Call[["subset"]])[[2]]
}
mfArgs$drop.unused.levels <- TRUE
dataMod <- do.call("model.frame", mf...
2002 Feb 12
1
problem plotting nls objects: couldn't find function "..."
...quot;) ~ fitted(.), abline,
id = NULL, idLabels = NULL, idResType = c("pearson", "normalized"),
grid, ...)
{
object <- x
if (!inherits(form, "formula")) {
stop("\"Form\" must be a formula")
}
allV <- all.vars(asOneFormula(form, id, idLabels))
allV <- allV[is.na(match(allV, c("T", "F", "TRUE", "FALSE")))]
if (length(allV) > 0) {
data <- getData(object)
if (is.null(data)) {
alist <- lapply(as.list(allV), as.name)
names(...