R/envfit.formula.R

"envfit.formula" <-
    function(formula, data, ...)
{
    if (missing(data))
        data <- parent.frame()
    X <- formula[[2]]
    X <- eval(X, data, parent.frame())
    formula[[2]] <- NULL
    P <- model.frame(formula, data, na.action = na.pass)
    envfit.default(X, P, ...)
}

Try the vegan package in your browser

Any scripts or data that you put into this service are public.

vegan documentation built on May 2, 2019, 5:51 p.m.