# Calculate life histories on the defalult models:
test <- CalcLifeHist(theta = c(b0 = -3, b1 = 0.1),
beta = c(b0 = 1, b1 = 0.01, b2 = 5),
ageMatur = 2)
# Print results:
test
# Summary:
summary(test)
# Plot results:
plot(test, type = "all")
Run the code above in your browser using DataLab