R/stable.stage.R

Defines functions stable.stage

Documented in stable.stage

stable.stage<-function(A)
{
   ev <- eigen(A)
   lmax <- which.max(Re(ev$values))
   W <- ev$vectors
   w <- abs(Re(W[, lmax]))
   names(w) <- colnames(A)
   w/sum(w)
}

Try the popbio package in your browser

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

popbio documentation built on May 4, 2018, 1:04 a.m.