Get K

Method to get values of the growth parameter K

getK(object, ...)

# S4 method for a4aGr
getK(object)

Arguments

object

an a4aGr object

...

additional argument list that might never be used

Value

a vector with K values

Examples

mm <- matrix(NA, ncol=3, nrow=3)
diag(mm) <- c(50, 0.001,0.001)
mm[upper.tri(mm)] <- mm[lower.tri(mm)] <- c(0.1,0.01,0.00004)
md <- ~linf*(1-exp(-k*(t-t0)))
imd <- ~t0-1/k*log(1-len/linf)
prs <- FLPar(linf=58.5, k=0.086, t0=0.001, units=c("cm","yr^-1","yr"))
vbObj <- a4aGr(grMod=md, grInvMod=imd, params=prs, vcov=mm, distr="norm")
vbObj <- mvrnorm(100,vbObj)
getK(vbObj)
#> An object of class "FLPar"
#> iters:  100 
#> 
#> params
#>                k 
#> 0.079148(0.0286) 
#> units:  yr^-1