From 0b22865916c7a2af70a668e70aa42c39b4e0c400 Mon Sep 17 00:00:00 2001
From: EmmaCartuyvels1 <emma_cartuyvels@hotmail.com>
Date: Thu, 16 May 2024 10:33:06 +0200
Subject: [PATCH] Update axis labels

---
 source/_verkenning.Rmd | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/source/_verkenning.Rmd b/source/_verkenning.Rmd
index f7a09fa..980b179 100644
--- a/source/_verkenning.Rmd
+++ b/source/_verkenning.Rmd
@@ -34,7 +34,7 @@ In totaal werden `r tot_n_species` soorten `{{group}}` gevonden.
   count(location_code, month, method_combi) |>
   ggplot(aes(x = method_combi, y = n, fill = method_combi)) +
   geom_bar(stat = "identity", position = position_dodge()) +
-  facet_grid(location_code ~ month) +
+  facet_grid(location_code ~ paste("maand:", month)) +
   theme(axis.title.x=element_blank(),
         axis.text.x=element_blank(),
         axis.ticks.x=element_blank())
@@ -389,7 +389,7 @@ rarefaction_result_3 %>%
     cumulative_n_species = map_dbl(accumulated_species_list, length),
     extra_n_species = cumulative_n_species - dplyr::lag(cumulative_n_species),
     pt_ts = str_sub(sampling_site_cd, 12, 13),
-    month = as.numeric(month)
+    month = as.numeric(as.character(month))
   ) %>%
   ungroup()
 ```