R/print.prestonfit.R

"print.prestonfit" <-
    function (x, ...) 
{
    cat("\nPreston lognormal model\n")
    cat("Method:", x$method,"\n")
    cat("No. of species:", sum(x$freq), "\n\n")
    print(x$coefficients, ...)
    cat("\nFrequencies by Octave\n")
    print(rbind(Observed = x$freq, Fitted = x$fitted), ...)
    cat("\n")
    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.