# NOT RUN {
# Read in some data from Sluggan Moss
data(Sluggan)
# Run the model
SlugDensFast <- with(
Sluggan,
BchronDensityFast(
ages = ages,
ageSds = ageSds,
calCurves = calCurves
)
)
# plot it
plot(SlugDensFast)
# }
Run the code above in your browser using DataLab