Convert a date like 12/15/2024 to academic year (assumed to start on July 1)
date_to_academic_year(dates)
Arguments
- date
A date or vector of dates
Value
a character string or vector with the academic year (i.e. "AY2024-2025")
Examples
dates <- as.Date(c("12/20/2024", "06/01/2021", "09/01/2021"), format="%m/%d/%Y")
print(cbind(format(dates, "%m/%d/%Y"), date_to_academic_year(dates)))
#> [,1] [,2]
#> [1,] "12/20/2024" "AY2024-2025"
#> [2,] "06/01/2021" "AY2020-2021"
#> [3,] "09/01/2021" "AY2021-2022"