Initialise Change_Value to string, otherwise it can default to logica…

…l and fail when only one parameter is changed.
Treasury-Analytics-and-Insights · May 6, 2024 · a9bed93 · a9bed93
1 parent 2d71867
commit a9bed93
Showing 1 changed file with 1 addition and 0 deletions.
diff --git a/R/app_utilities.R b/R/app_utilities.R
@@ -129,6 +129,7 @@ get_parameter_changes <- function(params_list) {
     params_list_str[, Parameter := factor(Parameter, levels = unique(Parameter))]
 
     # Calculate all sequential changes
+    params_list_str[, Change_Value := ""] # Initialise to string type
     params_list_str[, Change_Value := ifelse(Value == shift(Value), NA, Value), by = Parameter]
 
     changes <- dcast(