# NOT RUN {
sim <- sim_abundance(ages = 1:10, years = 1:10) %>%
sim_distribution(grid = make_grid(res = c(10, 10)),
ays_covar = sim_ays_covar(phi_age = 0.8,
phi_year = 0.1),
depth_par = sim_parabola(mu = 200,
sigma = 50))
head(sim$sp_N)
head(sim$grid_xy)
# }
Run the code above in your browser using DataLab