From 1acec3925ee7348ac219adcfc1a8092aac0a84ca Mon Sep 17 00:00:00 2001
From: Maria Voigt <maria.voigt@idiv.de>
Date: Wed, 19 Apr 2017 10:34:34 +0200
Subject: [PATCH] adding something to the suffix so the output name is easier

---
 src/model_fitting/abundance_model.R | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/src/model_fitting/abundance_model.R b/src/model_fitting/abundance_model.R
index 374ae38..638331c 100644
--- a/src/model_fitting/abundance_model.R
+++ b/src/model_fitting/abundance_model.R
@@ -125,9 +125,9 @@ options("scipen" = 100, "digits" = 4)
 if (is.na(exclude_year) & is.na(exclude_grid)){
   name_suffix <- ""}
    if(!is.na(exclude_year)){
-     name_suffix <- paste0(exclude_year, "_")}
+     name_suffix <- paste0("year_", exclude_year, "_")}
    if(!is.na(exclude_grid)){
-     name_suffix <- paste0(exclude_grid, "_")}
+     name_suffix <- paste0("gridcell_", exclude_grid, "_")}
 
 #---------------#
 #  Import data  #
-- 
GitLab