From d5f528dfe6ee677d228184c18b91caa801e63839 Mon Sep 17 00:00:00 2001
From: Maria Voigt <maria.voigt@idiv.de>
Date: Thu, 27 Apr 2017 18:50:14 +0200
Subject: [PATCH] small change and comment
---
src/model_fitting/abundance_model.R | 3 ++-
1 file changed, 2 insertions(+), 1 deletion(-)
diff --git a/src/model_fitting/abundance_model.R b/src/model_fitting/abundance_model.R
index 9a4b4a8..e8df2c3 100644
--- a/src/model_fitting/abundance_model.R
+++ b/src/model_fitting/abundance_model.R
@@ -274,6 +274,7 @@ saveRDS(predictors_obs, file = file.path(outdir, paste0("predictors_observation_
Sys.Date(), ".rds")))
#exclude_grid is an index (1:82) that needs to be translated into the actual index of the cell
+#DONT WANT TO HAVE THIS; THIS SUCKS
grid_cell_nrs <- unique(predictors_obs$grid_id)
grid_cell_nr <- grid_cell_nrs[exclude_grid]
@@ -293,7 +294,7 @@ if (!is.na(exclude_grid)){
# because then slightly less data
if (is.na(exclude_grid) & is.na(exclude_year)){
nr_maxit <- 250}else{
- nr_maxit <- 250}
+ nr_maxit <- 500}
if(is_verbose){ print(paste("3. start making all_model_terms", Sys.time()))}
# #build models needed for analysis with a function
--
GitLab