R/print.radfit.frame.R

"print.radfit.frame" <-
    function (x, ...) 
{
    cat("\nDeviance for RAD models:\n\n")
    out <- sapply(x, function(x) unlist(lapply(x$models, deviance)))
    printCoefmat(out, na.print = "", ...)
    invisible(x)
}

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.