runpoll: Pollinator model function

In yclough/ecodeal: Functions for economic-ecological analyses of agricultural landscapes

Description

Uses spatial data on floral and nesting quality to compute flower visitation and population dynamics for wild pollinators for a given year. The function can be used for mutliple years by running a loop and using as input the output of the previous model (see example).

Usage

runpoll(M_poll0 = numeric(0), firstyear, firstyearfactor = c(1, 1),
  bees = c("Bombus spp.", "Solitary spp."), cell.size = 25, paramList, nest,
  floral, cutoff = 0.99, loc_managed)

Arguments

M_poll0	the initial population sizes to be used only if we are not in the first year
firstyear	a boolean identifying whether we run the model for the first time (in which case we need to initialize the model)
firstyearfactor	a factor to control the initial population sizes, defaults to 1.
bees	a vector of bees identifiers corresponding to those in the parameter files
cell.size	the size of a cell in the landscape matrices, in meters (default to 25)
paramList	the list of parameters needed to run the model
nest	the rasterstack containing the nesting qualities (dimensions should be consistent with the number of bees in the model)
floral	the rasterstack containing the floral values (dimensions should be consistent with the number of bees in the model)
cutoff,	the percentile at which the dispersal kernel is cut off
loc_managed,	the location at which managed pollinators are placed (e.g. apiaries)

Value

a list containing :

M_poll

the number of queens at the end of each period and at the beginning of the next season

N_poll

the number of foraging bees in each period

flowvis

the visitation rates per cell in each period

floral and nest

the floral and nesting values (the same as in the inputs, but stored in the results for convenience)

pollres

the resources gathered by the bees

References

Haeussler J, Sahlin U, Baey C, Smith HG, Clough Y (2017) Predicting pollinator population size and pollination ecosystem service responses to enhancing floral and nesting resources. Ecology and Evolution, 7: 1898-1908.http://dx.doi.org/10.1002/ece3.2765

Examples

ffm<-edgearea_example
values(ffm)<-0

nf<-computeFloralNesting(landuseMap=landuse_example, edgesMap=stack(edgearea_example,ffm), unitEdges = "sqm", widthEdges=1,
                         landuseCodes, bees=c("Bombus spp.", "Solitary spp."), num_floral=2, florNestInfo=parameters$florNestInfo, codeEdges=c(200,201), cell.size = 25)
poll<-runpoll(M_poll0 = numeric(0), firstyear=TRUE, firstyearfactor = c(1, 1),
            bees = c("Bombus spp.", "Solitary spp."), cell.size = 25, paramList=parameters, nest=nf$nest,
            floral=nf$floral, cutoff = 0.99, loc_managed)

yclough/ecodeal documentation built on May 14, 2019, 2:01 a.m.