fixed naming of esub_cons plots

62ad6d0d · marius-lucas braun · 7e829880 · 62ad6d0d · 62ad6d0d · 62ad6d0d
Commit 62ad6d0d authored 1 year ago by marius-lucas braun
--- a/figures/CO2factor/plot_CO2factor_cbam_hi.pdf
+++ b/figures/CO2factor/plot_CO2factor_cbam_hi.pdf
--- a/figures/CO2factor/plot_CO2factor_cbam_lo.pdf
+++ b/figures/CO2factor/plot_CO2factor_cbam_lo.pdf
--- a/figures/CO2factor/plot_CO2factor_cbam_mi.pdf
+++ b/figures/CO2factor/plot_CO2factor_cbam_mi.pdf
--- a/figures/CO2factor/plot_CO2factor_policy_hi.pdf
+++ b/figures/CO2factor/plot_CO2factor_policy_hi.pdf
--- a/figures/CO2factor/plot_CO2factor_policy_lo.pdf
+++ b/figures/CO2factor/plot_CO2factor_policy_lo.pdf
--- a/figures/CO2factor/plot_CO2factor_policy_mi.pdf
+++ b/figures/CO2factor/plot_CO2factor_policy_mi.pdf
--- a/figures/esub_cons/hist_esub_cons_cbam_hi.pdf
+++ b/figures/esub_cons/hist_esub_cons_cbam_hi.pdf
--- a/figures/esub_cons/hist_esub_cons_cbam_lo.pdf
+++ b/figures/esub_cons/hist_esub_cons_cbam_lo.pdf
--- a/figures/esub_cons/hist_esub_cons_cbam_mi.pdf
+++ b/figures/esub_cons/hist_esub_cons_cbam_mi.pdf
--- a/figures/esub_cons/hist_esub_cons_policy_hi.pdf
+++ b/figures/esub_cons/hist_esub_cons_policy_hi.pdf
--- a/figures/esub_cons/hist_esub_cons_policy_lo.pdf
+++ b/figures/esub_cons/hist_esub_cons_policy_lo.pdf
--- a/figures/esub_cons/hist_esub_cons_policy_mi.pdf
+++ b/figures/esub_cons/hist_esub_cons_policy_mi.pdf
--- a/scripts/histograms.R
+++ b/scripts/histograms.R
@@ -66,7 +66,12 @@ for(i in 1:length(params)) {
      welf_effect = (get(welf_name))[welf_effect_name]
      
      # if parameter is CO2factor: line plot, else histogram
-      plot_type = ifelse(params[i] == "CO2factor", "plot", "hist")
+      plot_type = ifelse(
+        params[i] == "CO2factor" |
+        params[i] == "esub_cons",
+        yes = "plot",
+        no = "hist"
+      )
      
      # create plot name
      plot_name = paste(