Last chance! 50% off unlimited learning
Sale ends in
Generate parameters for simulation on a Network
.
Parameters include: average generation time calcAverageGenerationTime
,
calcPopulationGrowthRate
, and calcLarvalStageMortalityRate
.
Patch-specific parameters calcDensityDependentDeathRate
and calcLarvalPopEquilibrium
.
parameterizeMGDrivE(
runID = 1L,
nPatch,
simTime,
sampTime = 1L,
tEgg = 1L,
tLarva = 14L,
tPupa = 1L,
beta = 32,
muAd = 0.123,
popGrowth = 1.096,
AdPopEQ,
LarPopRatio,
AdPopRatio_F,
AdPopRatio_M,
inheritanceCube
)
Begin counting runs with this set of parameters from this value
Number of Patch
Maximum time to run simulation
Times to sample, used as tNow %% sampTime, default is every day
Length of egg stage
Length of larval instar stage
Length of pupal stage
Female egg batch size of wild-type
Wild-type daily adult mortality (1/muAd is average wild-type lifespan)
Daily population growth rate (used to calculate equilibrium)
Single number or vector of adult population size at equilibrium (single number implies all patches have the same population)
May be empty; if not, a vector gives the wildtype gene frequencies among larval stages at the beginning of simulation or a matrix provides different initial frequencies for each patch (every row is a different patch, must have nrow = nPatch)
May be empty; if not, a vector gives the wildtype gene frequencies among adult females at the beginning of simulation or a matrix provides different initial frequencies for each patch (every row is a different patch, must have nrow = nPatch)
May be empty; if not, a vector gives the wildtype gene frequencies among adult males at the beginning of simulation or a matrix provides different initial frequencies for each patch (every row is a different patch, must have nrow = nPatch)
Inheritance cube to check/set population ratios at the beginning of the simulation
# NOT RUN {
# using default parameters for 2 patches
# using different population sizes for patches
simPars <- parameterizeMGDrivE(nPatch = 2, simTime = 365,
AdPopEQ = c(100,200), inheritanceCube = cubeMendelian())
# }
Run the code above in your browser using DataLab