added leading zero to weeknumbers so mosaics van be found for week numbers smaller then 9

r_app/CI_report_dashboard_planet.Rmd

@@ -76,9 +76,10 @@ today_minus_1 <- as.character(ymd(today) - 7)
 today_minus_2 <- as.character(ymd(today) - 14)
 today_minus_3 <- as.character(ymd(today) - 21)
 
-week_minus_1 <- week(today_minus_1)
-week_minus_2 <- week(today_minus_2)
-week_minus_3 <- week(today_minus_3)
+file_path_tif <- here(weekly_CI_mosaic ,paste0("week_", sprintf("%02d", dates$week), "_", dates$year, ".tif"))
+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))
 
 year = year(today)
 year_2 = year(today_minus_1)

renv/.gitignore

@@ -1,7 +0,0 @@
-library/
-local/
-cellar/
-lock/
-python/
-sandbox/
-staging/