Fix the output path so excel, rds and csv are saved in the same folder
This commit is contained in:
parent
7eeed342f3
commit
13015f6ec0
|
|
@ -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_filename <- paste0(project_dir, "_field_analysis_week", sprintf("%02d_%d", current_week, year), ".rds")
|
||||||
rds_path <- file.path(reports_dir, rds_filename)
|
rds_path <- file.path(output_subdir, rds_filename)
|
||||||
|
|
||||||
saveRDS(kpi_data, rds_path)
|
saveRDS(kpi_data, rds_path)
|
||||||
message(paste("✓ Field analysis RDS exported to:", rds_path))
|
message(paste("✓ Field analysis RDS exported to:", rds_path))
|
||||||
|
|
|
||||||
Loading…
Reference in a new issue