Date -> calyear (character)
Examples
date_to_calyear_c("2021-08-11")
#> [1] "2021"
date_to_calyear_c(lubridate::today())
#> [1] "2024"
Date -> calyear (character)
date_to_calyear_c("2021-08-11")
#> [1] "2021"
date_to_calyear_c(lubridate::today())
#> [1] "2024"