diff --git a/src/model_fitting/abundance_model.R b/src/model_fitting/abundance_model.R index 8a19785ab7552228815f4ad636f36375021fb480..11999b91a65fa2c53103d1051df6504312f4ab36 100644 --- a/src/model_fitting/abundance_model.R +++ b/src/model_fitting/abundance_model.R @@ -139,8 +139,9 @@ ESW <- 0.01595 #effective strip width in km # ESW_aerial already defined print(paste("this is ESW aerial:", ESW_aerial)) NCS <- 1.12 #nest construction rate from Spehar et al. 2010 +#NCS <- 1.18 # from Husson 2009 PNB <- 0.88 # proportion of nest builders from Spehar et al. 2010 - +#PNB <- 0.89 options("scipen" = 100, "digits" = 4)