read_habitatsprings(): return point_id & unit_id as integers

inbo · Jan 22, 2024 · 72f8a18 · 72f8a18
1 parent 80fcfbb
commit 72f8a18
Showing 1 changed file with 5 additions and 0 deletions.
diff --git a/R/read_habitatdata.R b/R/read_habitatdata.R
@@ -1647,8 +1647,13 @@ read_habitatsprings <-
         everything(),
         -.data$validity_status,
         -.data$sbz
+      ) %>%
+      mutate(
+        point_id = as.integer(.data$point_id),
+        unit_id = as.integer(.data$unit_id)
       )
 
+
     if (version != "habitatsprings_2019v1") {
       habitatsprings <-
         habitatsprings %>%