Fix the output path so excel, rds and csv are saved in the same folder

This commit is contained in:
DimitraVeropoulou 2026-02-12 13:50:57 +01:00
parent 7eeed342f3
commit 13015f6ec0

View file

@ -709,8 +709,8 @@ export_field_analysis_excel <- function(field_df, summary_df, project_dir, curre
)
)
rds_filename <- paste0(project_dir, "_kpi_summary_tables_week", sprintf("%02d_%d", current_week, year), ".rds")
rds_path <- file.path(reports_dir, rds_filename)
rds_filename <- paste0(project_dir, "_field_analysis_week", sprintf("%02d_%d", current_week, year), ".rds")
rds_path <- file.path(output_subdir, rds_filename)
saveRDS(kpi_data, rds_path)
message(paste("✓ Field analysis RDS exported to:", rds_path))