View source: R/mig_stoch_crm.r
mig_stoch_crm | R Documentation |
Run migration stochastic collision risk model for a single species and one turbine scenario
mig_stoch_crm( wing_span_pars, flt_speed_pars, body_lt_pars, prop_crh_pars, avoid_bsc_pars, n_turbines, n_blades = 3, rtn_speed_pars, bld_pitch_pars, rtr_radius_pars, bld_width_pars, wf_width, wf_latitude, flight_type, prop_upwind = 0.5, popn_estim_pars, season_specs, chord_profile = chord_prof_5MW, trb_wind_avbl, trb_downtime_pars, n_iter = 10, LargeArrayCorrection = TRUE, log_file = NULL, seed = NULL, verbose = TRUE )
wing_span_pars |
A single row data frame with columns |
flt_speed_pars |
A single row data frame with columns |
body_lt_pars |
A single row data frame with columns |
prop_crh_pars |
A single row data frame with columns |
avoid_bsc_pars |
Single row data frame with columns
|
n_turbines |
An integer. The number of turbines expected to be installed |
n_blades |
An integer. The number of blades per turbine (defaults to 3) |
rtn_speed_pars |
A single row data frame with columns |
bld_pitch_pars |
A single row data frame with columns |
rtr_radius_pars |
A single row data frame with columns |
bld_width_pars |
A single row data frame with columns |
wf_width |
Numeric value, the approximate longitudinal width of the wind farm, in kilometres (w). |
wf_latitude |
A decimal value. The latitude of the centroid of the windfarm, in degrees. |
flight_type |
A character. Either "flying" or "gliding" representing the type of flight most commonly used by the species |
prop_upwind |
Numeric value between 0-1 giving the proportion of flights upwind - defaults to 0.5. |
popn_estim_pars |
A single row data frame with columns |
season_specs |
A data frame defining the seasons for aggregating over collision estimates. It must comprise the following columns:
|
chord_profile |
A data frame with the chord taper profile of the rotor blade. It must contain the columns:
|
trb_wind_avbl |
A data frame with the monthly estimates of operational wind availability. It must contain the columns:
|
trb_downtime_pars |
A data frame with monthly estimates of maintenance downtime, assumed to follow a tnorm-lw0 distribution. It must contain the following columns:
|
n_iter |
An integer > 0. The number of iterations for the model simulation. |
LargeArrayCorrection |
A boolean. Should the large array correction be calculated |
log_file |
Path to log file to store session info and main model run options. If set to NULL (default value), log file is not created. |
seed |
Integer, the random seed for random number generation, for analysis reproducibility. |
verbose |
boolean. TRUE for a verbose output |
This function is an adaption of code from Masden(2015) used for estimating the collision risk of seabirds in offshore windfarm sites and is a further adaptation from Band(2012). It is a further adaptation of the stoch_crm function.
The collision risk model evaluates risk for each defined migratory period where flux rate is simply the number of birds travelling through the windfarm.
Changes in relation to previous top-line function stoch_crm
function will run only option 1 for migratory species
Estimates of number of collisions per migratory season for the n number of iterations specified
# ------------------------------------------------------ # Run with arbitrary parameter values, for illustration # ------------------------------------------------------ season_specs <- data.frame( season_id = c("PrBMigration", "PoBMigration","OMigration"), start_month = c("Mar", "May", "Oct"), end_month = c("Apr", "Sep", "Feb") ) # wind availability windavb <- data.frame( month = month.abb, pctg = runif(12, 85, 98) ) head(windavb) # maintenance downtime dwntm <- data.frame( month = month.abb, mean = runif(12, 6, 10), sd = rep(2, 12)) head(dwntm) mig_stoch_crm( # Wing span in m, wing_span_pars = data.frame(mean = 1.08, sd = 0.04), # Flight speed in m/s flt_speed_pars = data.frame(mean = 7.26, sd = 1.5), # Body length in m, body_lt_pars = data.frame(mean = 0.39, sd = 0.005), # Proportion of birds at CRH prop_crh_pars = data.frame(mean = 0.06, sd = 0.009), # avoidance rate avoid_bsc_pars = data.frame(mean = 0.99, sd = 0.001), n_turbines = 150, n_blades = 3, # rotation speed in m/s of turbine blades rtn_speed_pars = data.frame(mean = 13.1, sd = 4), # pitch in degrees of turbine blades bld_pitch_pars = data.frame(mean = 3, sd = 0.3), # sd = 0, rotor radius is fixed rtr_radius_pars = data.frame(mean = 80, sd = 0), # sd = 0, blade width is fixed bld_width_pars = data.frame(mean = 8, sd = 0), wf_width = 100, wf_latitude = 54.1, prop_upwind = 0.5, flight_type = "flapping", # population flying through windfarm, popn_estim_pars = data.frame(mean = 21584, sd = 2023), season_specs = season_specs, chord_profile = chord_prof_5MW, trb_wind_avbl = windavb, trb_downtime_pars = dwntm, n_iter = 1000, LargeArrayCorrection = TRUE, log_file = NULL, seed = 1234, verbose = TRUE)
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.