View source: R/metasim.disturbance.R
metasim.disturbance | R Documentation |
Wrapper function for MCSim::metasim, sends landscape list and interval duration list, along with other metasim parameters that will be fixed across all simulations
metasim.disturbance(scenario.name, landscape.list, time.interval.durations)
scenario.name |
text string naming the scenario |
landscape.list |
list of landscapes to run in series |
time.interval.durations |
vector of integers representing the number of timesteps to use for each landscape in the landscape_list, MUST be same length as landscape_list |
J.t0.initial |
Initial species abundance matrix for timestep "t0" |
scenario_name |
DEPRECATED: use |
landscape_list |
DEPRECATED: use |
time_interval_durations |
DEPRECATED: use |
J.t0_initial |
Deprecated: use |
... |
parameters sent to metasim() |
## Not run: set.seed(1234) #set random seed # make a landscapes my.landscape.1 <- make.landscape( site.coords = data.frame( x = c(1, 2, 3, 4, 5), y = c(1, 3, 1, 5, 2)), Ef = c(-.8, -.6, 0, .25, .9), m = 0.5, JM = 10000) my.landscape.2 <- make.landscape( site.coords = data.frame( x = c(1, 2, 3, 4, 5), y = c(1, 3, 1, 5, 2)), Ef = c(-.8, -.6, 0, 0, 0), m = 0.5, JM = 10000) # niche positions, niche breadths, and relative abundances for three species niche.positions <- c(-.5, 0, .5) niche.breadths <- c(.2, .2, 5) regional.rel.abund <- c(.8, .1, .1) sim.result <- metasim.disturbance( scenario.name = "niche_shift", landscape.list = list(my.landscape.1,my.landscape.2), time.interval.durations = c(10,10), trait.Ef = niche.positions, trait.Ef.sd = niche.breadths, gamma.abund = regional.rel.abund, W.r = 0, nu = 0.001, output.dir.path = "my_disturbance_sim_output_directory") ## End(Not run)
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.