The U.S. Fish and Wildlife Service (FWS) uses a Bayesian framework to predict eagle collisions and fatalities at proposed wind energy sites. One of the appeals of Bayesian modeling is the ability to incorporate prior information and uncertainty regarding parameter values into estimates, ideally providing a better representation of reality. However, there is still debate over the appropriate choice and use of priors. Additionally, as Bayesian methodology is still gaining widespread familiarity, the ways in which prior information affects model outcomes can be unclear.
The purpose of this paper is to illustrate and quantify the effects of Bayesian priors used by FWS on the predicted outcomes of the eagle mortality model, in terms of predicted eagle fatalities. We use both empirical data from wind farms provided in a study presenting the methods used by FWS to implement the Bayesian prediction model (Bay et al. 2016), as well as a simulated dataset to demonstrate these effects both in theory and in practice.
Fully understanding the effects of priors is relevant to both energy developers and wildlife conservationists, because estimates of eagle take are used to determine permitting and mitigation costs.
The components of the Bayesian model used by FWS to predict eagle fatality are:
These parameters are represented as probability distributions, and combined to produce a posterior distribution representing the relative likelihood of how many ealges will be killed annually at a site.
\(Fatalities = Exposure * Collision Rate * Expansion\)
To be conservative, FWS uses the 80th percentile of this posterior distribution in setting take limits, and we display these values unless otherwise noted.
In this paper, we focus on eagle exposure rate, as this parameter is subject to both site-specific survey data, and a Bayesian prior distribution. The expansion factor is determined completely by the characteristics of a site. Similarly, the collision rate is estimated entirely by a prior distribution based on rates observed at existing wind facilities.
The data shown in Table 1 are the survey data used as example values for the eagle wind mortality model. These were derived from an empirical dataset (Appendix A in Bay et al. (2016)), which contains pre-construction eagle survey data from 26 wind energy sites. Survey effort indicates the amount of time and area covered during pre-construction surveys, and eagle observations are the duration of time over which eagles were observed flying within survey areas.
Eagle flight time and survey effort are used to estimate eagle exposure at a given wind site. Figure 2 shows how the exposure measured at a site (green lines) is integrated with a consistent prior distribution of exposure probabilities (purple), to produce a probability distribution of exposure (yellow). This resulting distribution is used as the exposure rate to predict eagle fatalities at a site. The effect of the prior distribution is to modify extreme observed values that differ greatly from mean observations across a larger sample of sites.
At the majority of sites, the Bayesian estimate of eagle fatalities using prior exposure information was higher than a site-specific estimate (Fig. 2). These instances are indicated by points above the 1:1 line in Figure 2. The influence of eagle exposure priors on estimated eagle fatalities was less at facilities that expended greater effort on pre-construction surveys. This pattern is indicated by the sites with the most intensive surveys falling closest to a 1:1 relationship between the two estimates (Fig. 2).
Source: Bay et al. (2016)
To investigate the effects of prior information and survey effort on predicted take, we created a dataset representing a range of possible pre-construction survey values for survey area, time, and eagle observations. We then produced eagle fatality estimates for these possible values using the FWS bayesian model.
For eagle exposure rates < 1.21 min/hr*km3, predicted fatlity rates estimated using priors were higher than site-specific estimates (i.e. above the 1:1 line in Fig. 3). This pattern reversed when exposure was > 1.21. The threshold of 1.1 corresponds to the mean exposure rate of the prior exposure distribution. The actual value of this threshold is subject to change as prior distributions are updated with new survey data, but the pattern will be consistent. Figure 4 also illustrates that predicted fatalities estimated with and without priors are more similar when survey effort is greater (i.e., larger circles).
The prior distribution of exposure probabilities has a greater effect on estimates when observed exposure rate at a site is farther from the mean of the prior. Figure 5 illustrates this relationship in terms of how many standard deviations an observed exposure rate was from the prior mean. At one standard deviation above or below the mean, take estimates can differ by as much as 1.5 eagles per year.
Increased survey effort reduced the influence of prior distributions of exposure probability on estimates of fatalities, resulting in less discrepacy between predictions obtained using priors and those obtained using site survey data only. The magnitude of the effect of effort on estimate discrepancy was contingent upon the observed eagle exposure rate. This discrepancy decreased logarithmically with greater survey effort (Fig.6). The precision of posterior estimates, measured by the difference between the 80th percentile and mean estimate standardized by the mean, did not change as survey efforts increased.
A bayesian approach to estimating fatalities guards against situations where surveys fail to detect eagles that are in fact present around the site. However, this means that sites where there are truly no birds will have some predicted take. In situations where no eagles are observed during pre-construciton surveys, greater survey effort moves predicted take closer to zero (Fig. 7). This response is highly dependent on the size of the wind farm. For the smallest sites, 48 hr.km2 of survey effort reduced fatality predictions < 1. Large sites with no eagle observations require more survey effort to reduce predicted take to zero (~300 hr.km2). however the rate of reduction is greater at large sites than at smaller sites.
We generated posterior distributions for predicted eagle fatalities from empirical and simulation data using the FWS Bayesian model. The prior distribution on eagle exposure used by FWS is a gamma distribution Exposure ~ Gamma (11.82, 9.76), with shape and rate parameters represented by eagle flight time in minutes, and survey effort in (hr km3). The prior distribution on collisions used by FWS is a beta distribution Collision ~ Beta (1.64, 290.02) with parameters representative of number of collisions and minutes of exposure.
We used wind energy site survey data from Appendix A in Bay et al. (2016) to obtain example survey values. This data recorded plot area in hectares, and observation time in minutes. We converted these to survey effort consistent with the units used by FWS (hr km3) by rescaling plot area (ha) by 0.2 km/ha, and multiplying by the reported observation time in hours.
We also estimated the expansion factor (not reported in Bay et al. (2016)) for each site to produce fatality estimates in numbers of eagles per year. We quantified the relationship between ‘Flight Risk Area’, and predicted ‘Collisions per Annuum’ reported in Bay et al. (2016) using a generalized linear model. First, we divided Collisions per Annuum reported at each site by the site exposure, and mean of the prior collision rate distribution to obtain the site-specific collision rates per eagle activity rate. We modeled this rate as a quadratic funciton of site risk area.
glm(data = Bay_16, (COLLISIONS/(FLIGHT_MIN/EFFORT))/0.002895415 ~ RISK_HA + RISK_HA^2)
The coefficients from this model were then used as the expansion factor for each site. Thus we calculate the flight risk area as -2.255810^{4} + 2306 * Risk Area + -2.61 * (Risk Area) 2.
We generated hypothetical values for survey effort based on the minimum requirements provided by U.S. FWS for pre-construction monitoring. FWS requires at least one cylindrical survey plot with radius > 800m and height > 200m, and that plots be surveyed for at least 12 hours per year, for two years. Thus, the minimum values for survey area and time were 0.402 km3, and 24 hrs, respectively. We simulated up to five plots (area = 2.01) in increments of one, and up to 240 hrs in increments of 12, and calculated survey effort for all combinations.
Observed eagle flight time (min) provided in Bay et al. (2016) is a function of survey effort and eagle activity at a site. Therefore, to generate a range of potential exposure values (min/hr*km3), we divided flight time by effort at each survey site to obtain an effort invariant measure of eagle exposure rate, and took a random sample of 20 values. The final simulation data included all combinations of survey effort and eagle exposure rate, which we multiplied to obtain flight minutes, producing 1000 values.
flight <- sample(BAY16$MIN/Bay16$EFFORT, 20)
survey_time <- seq(1, 10, 1)*12*2
survey_area <- seq(0.402, 2.01, 0.402)
df <- expand.grid(TIME = time, AREA = area, eagle_rate = flight)
df$beta <- df$TIME*df$AREA
df$alpha <- df$eagle_rate*df$beta
We generated eagle fatality predictions using only simulated or empirical values for observed eagle minutes and survey effort, and by updating the prior probability of exposure using these values. We obtained the posterior exposure distribution as in New et al. (2013) Exposure ~ Gamma(a + minutes, b + effort), where a and b are the shape and rate parameters from the prior distribution.
# simFatal funciton from New et al. (2013) modified to perform multiple iterations.
# BMin: observed number of bird minutes
# Fatal: annual avian fatalities on an operational wind facility
# SmpHrKm: total time and area surveyed for bird minutes
# ExpFac: expansion factor
# aPriExp: alpha parameter for the prior on lambda
# bPriExp: beta parameter for the prior on lambda
# aPriCPr: alpha parameter for the prior on C
# bPriCPr: beta parameter for the prior on C
# iters: number of sampling iterations
simFatal <- function(BMin=-1, Fatal=-1, SmpHrKm, ExpFac, aPriExp=1,
bPriExp=1,aPriCPr=1, bPriCPr=1, iters){
out <- data.frame(collision = rep(NA,iters),
expose = rep(NA, iters),
fatality = rep(NA, iters)
)
# The default of a negative value for BMin or Fatal indicates no data
if(BMin>=0){
aPostExp <- aPriExp + BMin
bPostExp <- bPriExp + SmpHrKm
}else{
aPostExp <- aPriExp
bPostExp <- bPriExp}
# Update the collisions prior
if(Fatal>=0){
aPostCPr <- aPriCPr + Fatal
bPostCPr <- ((rvmean(Exp) * ExpFac) - Fatal) + bPriCPr
}else{
aPostCPr <- aPriCPr
bPostCPr <- bPriCPr}
for(i in 1:iters){
Exp <- rgamma(n=1, aPostExp, bPostExp)
CPr <- rbeta(n=1, aPostCPr, bPostCPr)
Fatalities <- ExpFac * Exp * CPr
out[i,] <- c(CPr, Exp, Fatalities)
}
return(out)
}
estimates <- function(iters, a, b){
out <- simFatal(BMin = a,
Fatal = -1,
SmpHrKm = b,
ExpFac = mean(Bay16$SCALE),
aPriExp = 11.81641,
bPriExp = 9.7656250,
aPriCPr = 1.638029,
bPriCPr = 290.0193,
iters = iters)
fatality <- mean(out$fatality)
q80 <- quantile(out$fatality, c(0.8))
out2 <- simFatal(BMin = a,
Fatal = -1,
SmpHrKm = b,
ExpFac = mean(Bay16$SCALE),
aPriExp = 0,
bPriExp = 0,
aPriCPr = 1.638029,
bPriCPr = 290.0193,
iters = iters)
fatality2 <- mean(out2$fatality)
q82 <- quantile(out2$fatality, 0.8)
return (c("MN_F" = fatality, "U_F" = q80, "MN" = fatality2, "U" = q82))
}
We used an iterative sampling procedure to produce a posterior distribution of annual eagle fatalities. During each iteration, we drew a random sample from the updated exposure distribution and the prior collision probability distribution, and multiplied these values together with a site specific expansion factor. For simulated values, we used the mean expansion factor from the empirical data. For each site and set of simulated values, we performed 100000 iterations of this sampling procedure, and calculated the mean and 80th percentile values of the resulting distribution.
#Predictions integrating Exposure prior and survey data
sim <- plyr::mdply(df[, c(5, 4)], estimates, niters = 100000)
#Predictions from survey data
emp <- vapply(1:nrow(Bay16), function(x){
estimates(100000, Bay16$FLIGHT_MIN[x], BAY16$EFFORT[x])
return (c(fatality, q80, fatality2, q82))
},
USE.NAMES = FALSE, FUN.VALUE = c(0,0,0,0))
)