Added releve plot size to Patagonia

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