Timon/SmartCane
1
1
Fork 0
Code Issues Pull requests Actions Packages Projects Releases Wiki Activity

run with one day of

Browse source
This commit is contained in:
Martin Folkerts 2024-07-19 14:10:49 +02:00
parent 591a30d2a8
commit 0109a57b04
1 changed files with 1 additions and 4 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

5
r_app/CI_report_dashboard_planet.Rmd
View file

@ -79,13 +79,10 @@ 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)){
if (which(days_of_week == report_date_as_week_day) > (which(days_of_week == mail_day_as_character)+1)){
week <- week(today) + 1
}
# week <- week(today)
# week <- 25