Displaying 1 result from an estimated 1 matches for "covf".
Did you mean:
conf
2002 Feb 12
1
problem plotting nls objects: couldn't find function "..."
...bs$y))
rL <- paste(lbs$y, unts$y)
else rF <- NULL
}
else {
rF <- cF <- NULL
}
dots <- list(...)
if (length(dots) > 0)
args <- dots
else args <- list()
data <- as.list(c(as.list(data), . = list(object)))
covF <- getCovariateFormula(form)
.x <- eval(covF[[2]], data)
if (!is.numeric(.x)) {
stop("Covariate must be numeric")
}
argForm <- ~.x
argData <- data.frame(.x = .x, check.names = FALSE)
if (is.null(xlab <- attr(.x, "label"))) {...