Skip to content
Prev 388588 / 398530 Next

Assigning categorical values to dates

date_df <- tibble(dates = c(rep("2021-07-04", 2), rep("2021-07-25", 3),
rep("2021-07-18", 4)))



cycle_from_date <-   function(date,dates){
  dates |>
    unique() |>
    sort() ->
    ranks
  match(date,ranks)
}

date_df |>
  mutate(cycle_new=cycle_from_date(dates,dates))