adding other proportion nest builder parameters

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)