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)