wip
This commit is contained in:
parent
19e3f79371
commit
591a30d2a8
|
|
@ -75,7 +75,7 @@ source(here("r_app", "parameters_project.R"))
|
|||
today <- as.character(report_date)
|
||||
mail_day_as_character <- as.character(mail_day)
|
||||
|
||||
report_date_as_week_day = wday(today)
|
||||
report_date_as_week_day = weekdays(as.Date(today))
|
||||
days_of_week <- c("Sunday", "Monday", "Tuesday", "Wednesday", "Thursday", "Friday", "Saturday")
|
||||
#als de index of report_date_as_week_day groter dan de index van de mail_day dan moet de week + 1
|
||||
week <- week(today)
|
||||
|
|
|
|||
Loading…
Reference in a new issue