correcting shift_dates name

IDEMSInternational · Mar 6, 2024 · e5554d1 · e5554d1
1 parent eb0a732
commit e5554d1
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/R/shift_dates.R b/R/shift_dates.R
@@ -20,7 +20,7 @@
 #' \code{\link{yday_366}}: A helper function to calculate day of the year for leap years.
 #'
 #' @importFrom lubridate yday
-shift_dates1 <- function(data, date, s_start_doy, doy_shift_name = "s_doy", year_shift_name = "s_year"){
+shift_dates <- function(data, date, s_start_doy, doy_shift_name = "s_doy", year_shift_name = "s_year"){
   # Calculate day of the year for leap years (366 days)
   doy <- yday_366(data[[date]])