fix #361

r-geoflow · Sep 20, 2023 · 2d18a76 · 2d18a76
1 parent a8e0f11
commit 2d18a76
Showing 1 changed file with 2 additions and 0 deletions.
diff --git a/R/geoflow_utils.R b/R/geoflow_utils.R
@@ -46,6 +46,8 @@ sanitize_date <- function(date){
         date <- as.Date(date)
       }else if(nchar(date)==7){
         date <- as.Date(paste0(date,"-01"))
+      }else if(nchar(date)==4){
+        date <- as.Date(paste0(date,"-01-01"))
       }else{
         date <- as.POSIXct(date) 
       }