From a275091eb24087f0d50adc3d5dd58cdf07ad755c Mon Sep 17 00:00:00 2001
From: Maria Voigt <maria.voigt@idiv.de>
Date: Tue, 18 Apr 2017 16:33:02 +0200
Subject: [PATCH] fixing bug
---
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 0f7c2dc..590f879 100644
--- a/src/model_fitting/abundance_model.R
+++ b/src/model_fitting/abundance_model.R
@@ -282,7 +282,8 @@ if (!is.na(exclude_year)){
# or the grid_cell
if (!is.na(exclude_grid)){
predictors_excluded_grid <- predictors_obs[predictors_obs$grid_id == exclude_grid, ]
- predictors_obs <- predictors_obs[predictors_obs$s$grid_id != exclude_grid, ]}
+ predictors_obs <- predictors_obs[predictors_obs$grid_id != exclude_grid, ]
+}
if(is_verbose){ print(paste("3. start making all_model_terms", Sys.time()))}
--
GitLab