Ensure plot-scenarios script actually runs

plot-scenarios.R

 #!/usr/bin/env -S Rscript --vanilla
 
-script_name <- "plot.R"
+script_name <- "plot-scenarios.R"
 
 
 prepare_data <- function(input_file) {