Rename individualSpeed

inbo · Jun 27, 2023 · 5497f1f · 5497f1f
1 parent 6aabe92
commit 5497f1f
Showing 1 changed file with 4 additions and 0 deletions.
diff --git a/R/read_camtrap_dp.R b/R/read_camtrap_dp.R
@@ -326,6 +326,10 @@ read_camtrap_dp <- function(file = NULL,
       observations <- observations %>%
         dplyr::mutate("_id" = NA)
     }
+    if ("individualSpeed" %in% names(observations)) {
+      observations <- observations %>%
+        dplyr::rename(speed = "individualSpeed")
+    }
   }
 
   if (version == "0.1.6"){