From 3b8fe20d609ca8889acb273fe9d193e3428bc2d3 Mon Sep 17 00:00:00 2001 From: Monika Furdyna Date: Thu, 16 May 2024 18:49:39 +0200 Subject: [PATCH] feat: Add data needed for new survey chapter (#76) --- R/create_interactive_report.R | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) diff --git a/R/create_interactive_report.R b/R/create_interactive_report.R index 2332030..debced4 100644 --- a/R/create_interactive_report.R +++ b/R/create_interactive_report.R @@ -479,7 +479,8 @@ create_interactive_report <- if ( length(list.files(survey_dir)) > 0) { survey_flag <- TRUE survey_data <- list( - summary_table = readr::read_csv(path(output_dir, "survey","summary_table.csv"), col_types = cols_only(row_tag = "c", row_label = "c", value = "d")) + summary_table = readr::read_csv(path(output_dir, "survey","summary_table.csv"), col_types = cols_only(row_tag = "c", row_label = "c", value = "d")), + climate_goals = readr::read_csv(path(output_dir, "survey","climate_goals.csv"), col_types = cols_only(climate_goal_user = "l", perc_climate_goal_peers = "d")) ) }