lea/RProjects
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

[éCow] correction listes vides

Browse Source
This commit is contained in:
Léa
2026-06-24 15:29:35 +02:00
parent 522362d45d
commit d0fa2b6f1d
1 changed files with 1 additions and 1 deletions
Download Patch File Download Diff File Expand all files Collapse all files
R/common/prepare_data.R
+1 -1
View File
@@ -8,7 +8,7 @@ suppressPackageStartupMessages({
#' @param tab_anims dataframe. Liste d'animaux brute #' @param tab_anims dataframe. Liste d'animaux brute
#' @return Liste d'animaux nettoyée #' @return Liste d'animaux nettoyée
clean_data_anims<- function(tab_anims){ clean_data_anims<- function(tab_anims){
if (nrow(tab_anims) == 0) return() if (is.null(tab_anims) || !isTRUE(nrow(tab_anims) > 0)) return()
result_data <- tab_anims %>% result_data <- tab_anims %>%
mutate( mutate(
dateNaiss = as.Date(as.POSIXct(dateNaiss / 1000, origin = "1970-01-01", tz = "UTC")), dateNaiss = as.Date(as.POSIXct(dateNaiss / 1000, origin = "1970-01-01", tz = "UTC")),