get_fhd_rotor {stochLAB}

Returns the proportion of birds at height bands along the rotor

Description

Derive the expected proportion of bird flights at equidistant height bands between the lowest and highest points of the rotor. In other words, returns the flight height distribution at collision risk (d(y)).

Usage

get_fhd_rotor(hub_height, fhd, rotor_radius, tidal_offset, yinc = 0.05)

Arguments

hub_height

A numeric value, the height of the rotor hub (H), given by the sum of rotor radius and minimum blade clearance above the highest astronomical tide (HAT), in metres.

fhd

A numeric vector, the proportion of bird flights per-1 metre height bands from sea surface, starting from 0-1 metre band.

rotor_radius

A numeric value, the radius of the rotor (R), in metres.

tidal_offset

A numeric value, the tidal offset, the difference between HAT and mean sea level, in metres.

yinc

A numeric value, the increment for height bands between the lowest and highest points of the rotor, expressed as a proportion of rotor radius (defaults is 0.05).

Value

A numeric vector, the flight height distribution at collision risk, i.e. between minimum and maximum rotor height.

Examples

 gen_fhd_dat <- Johnston_Flight_heights_SOSS %>%
       dplyr::filter(variable=="Gannet.est") %>%
       dplyr::select(height,prop)
 if(is.data.frame(gen_fhd_dat)) gen_fhd <- gen_fhd_dat$prop

 get_fhd_rotor(
   hub_height = 150,
   fhd = gen_fhd,
   rotor_radius = 120,
   tidal_offset = 2.5,
   yinc = 0.05)