From a96c8d75139ca05deebbfa5a1bf8c67d7bebc3cf Mon Sep 17 00:00:00 2001
From: Francesco Sabatini <francesco.sabatini@idiv.de>
Date: Fri, 14 Feb 2020 15:55:23 +0100
Subject: [PATCH] Added releve plot size to Patagonia

---
 code/04_buildHeader.Rmd | 9 ++++++++-
 1 file changed, 8 insertions(+), 1 deletion(-)

diff --git a/code/04_buildHeader.Rmd b/code/04_buildHeader.Rmd
index 6bfca88..f481745 100644
--- a/code/04_buildHeader.Rmd
+++ b/code/04_buildHeader.Rmd
@@ -162,7 +162,14 @@ header <- header %>%
                                             `Location uncertainty (m)`)) %>% 
   dplyr::select(-loc.uncer.median)
 ```
-There are still `r nrow(header %>% filter(is.na(`Location uncertainty (m)`)))` plots with no estimation of location uncertainty.
+There are still `r nrow(header %>% filter(is.na(`Location uncertainty (m)`)))` plots with no estimation of location uncertainty.  
+\newline
+Assign plot size to plots in the Patagonia dataset (input of Ana Cingolani)
+```{r}
+header <- header %>% 
+  mutate(`Relevé area (m²)`=ifelse( (Dataset=="Patagonia" & is.na(`Relevé area (m²)`)), 
+                                    -900, `Relevé area (m²)`))
+```
 
 ## 2 Formations
 Fill out the columns `Forest:Sparse.vegetation` with 0\\NAs, where necessary. Create columns `is.forest` and `is.non.forest` using script developed for sPlot 2.1  
-- 
GitLab