diff --git a/r_app/CI_report_dashboard_planet.Rmd b/r_app/CI_report_dashboard_planet.Rmd
index a1d3866..7e3b471 100644
--- a/r_app/CI_report_dashboard_planet.Rmd
+++ b/r_app/CI_report_dashboard_planet.Rmd
@@ -102,10 +102,9 @@ if (which(days_of_week == report_date_as_week_day) > which(days_of_week == mail_
 subtitle_var <- paste("Report generated on", Sys.Date())
 
 
-
-week_minus_1 <- sprintf("%02d", week(today_minus_1))
-week_minus_2 <- sprintf("%02d", week(today_minus_2))
-week_minus_3 <- sprintf("%02d", week(today_minus_3))
+week_minus_1 <- week -1 # sprintf("%02d", week(today_minus_1))
+week_minus_2 <- week -2 # sprintf("%02d", week(today_minus_2))
+week_minus_3 <- week -3 # sprintf("%02d", week(today_minus_3))
 week <- sprintf("%02d", week)