R/pcovar.default.R

In dave: Functions for "Data Analysis in Vegetation Ecology"

Defines functions pcovar.default

Documented in pcovar.default

pcovar.default <-
function(veg,y,...) {
    o.pcovar<- pcoatest(veg,y)
    class(o.pcovar)<- "pcovar"
    o.pcovar$call<- match.call()
    cat("Call:\n")
    print(o.pcovar$call)
    o.pcovar
  }

Try the dave package in your browser