R/gen.time.R

`gen.time` <-
function(A,peryear=5){
  ro <- calc.ro(A)
  ea <- eigen.analysis(A)
  T <- peryear*log(ro)/log(ea$lambda)

  T
}
hanase/demogR documentation built on May 9, 2019, 7:33 p.m.