From 861244fec15051251f7ef048b7a2dfe5959da463 Mon Sep 17 00:00:00 2001 From: Martin Folkerts Date: Fri, 19 Jul 2024 14:38:50 +0200 Subject: [PATCH] okay --- r_app/CI_report_dashboard_planet.Rmd | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/r_app/CI_report_dashboard_planet.Rmd b/r_app/CI_report_dashboard_planet.Rmd index 88c01ae..6f7d153 100644 --- a/r_app/CI_report_dashboard_planet.Rmd +++ b/r_app/CI_report_dashboard_planet.Rmd @@ -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 }