R/print.fisherfit.R

`print.fisherfit` <-
    function (x, ...) 
{
    cat("\nFisher log series model\n")
    cat("No. of species:", sum(x$fisher), "\n")
    cat("Fisher alpha:  ", x$estimate, "\n\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 Sept. 11, 2024, 7:57 p.m.