This page is a method.
The page identifier is Op_en5726 |
|---|
| Moderator:Nobody (see all) Click here to sign up. |
| This page is a stub. You may improve it into a full page, and then a rating bar will appear here. |
| Upload data
|
movariable takes a data.frame, a function, and a list and makes an ovariable out of them. It is a subfunction of make.ovariable and prevents infinite recursion of S4 methods.
# MOVARIABLE ########## movariable takes a data.frame, a function, and a list and makes an ovariable out of them. It is a
#####subfunction of make.ovariable and prevents infinite recursion of S4 methods.
movariable <- function(
data,
formula,
dependencies,
name
) {
output <- interpret(data)
out <- new("ovariable",
name = name,
output = output,
data = data,
marginal = ifelse(colnames(output) %in% c("Result", "Unit"), FALSE, TRUE),
formula = formula,
dependencies = dependencies
)
out <- update(out)
return(out)
}
|
