From 591a30d2a86de4083e7d392c6b7420d7bc7c3527 Mon Sep 17 00:00:00 2001 From: Martin Folkerts Date: Fri, 19 Jul 2024 14:02:37 +0200 Subject: [PATCH] wip --- 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 c0dbfcb..cd9f4b0 100644 --- a/r_app/CI_report_dashboard_planet.Rmd +++ b/r_app/CI_report_dashboard_planet.Rmd @@ -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)