# NOT RUN {
# Modify populations in all life-stages using explicit layers of origin and destination populations
# in timesteps 5, 10, and 15.
# }
# NOT RUN {
trans_pop <- translocation(origins_layer = "origins",
destinations_layer = "destinations",
stages = NULL,
effect_timesteps = c(5, 10, 15))
ls <- landscape(population = egk_pop,
suitability = NULL,
carrying_capacity = NULL,
"origins" = egk_origins,
"destinations" = egk_destinations)
pd <- population_dynamics(change = growth(egk_mat), modification = trans_pop)
simulation(landscape = ls, population_dynamics = pd, habitat_dynamics = NULL, timesteps = 20)
# }
Run the code above in your browser using DataLab