okay
This commit is contained in:
parent
0109a57b04
commit
861244fec1
|
|
@ -79,7 +79,7 @@ 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)
|
||||
if (which(days_of_week == report_date_as_week_day) > (which(days_of_week == mail_day_as_character)+1)){
|
||||
if (which(days_of_week == report_date_as_week_day) > (which(days_of_week == mail_day_as_character+1)){
|
||||
week <- week(today) + 1
|
||||
}
|
||||
|
||||
|
|
|
|||
Loading…
Reference in a new issue