I believe this allows males to be holding territories without pairing with a female.

eq06_Bmc(W2, K.bc)

Arguments

W2

Population vector produced by eq02buildW1Mat()

K.bc

Carrying capacity (K) during breeding season (b) of source (c) habitat

Value

B.mc Total number of males allocated to source habitat.

Details

TODO(): Check this

References

Runge, MC and PP Marra. 2004. Modeling seasonal interactions in the population dynamics of migratory birds. In Greenberg, R and PP Marra, eds. Birds of two worlds. Johns Hopkins University Press, Baltimore.

Examples

# Standard example
## Set population vector and carrying capacities
W2. <- c(10, 10,10, 10)
W2. <- setNames(W2., c("mg","fg","mp","fp"))
K.bc. <- 10
eq06_Bmc(W2 = W2., K.bc = K.bc.)
#> [1] 10