diff --git a/impetusModel/applyDroughtWEmodel.Rmd b/impetusModel/applyDroughtWEmodel.Rmd
index 444af9a592182b7468e8bd975070f7fed3c729e6..ceaf368565b5793152dc58448d9dc901e5939523 100644
--- a/impetusModel/applyDroughtWEmodel.Rmd
+++ b/impetusModel/applyDroughtWEmodel.Rmd
@@ -848,8 +848,8 @@ myDrPlot
 ggsave("Fig4_Compare_sum_model_v1_3.pdf", dpi = 400)
 
 # Grey scale version if required
-myDrPlot <- myDrPlot + theme_bw()
-ggsave("Fig4_Compare_sum_model_v1_3_gs.pdf", plot = myDrPlot, dpi = 400)
+#myDrPlot <- myDrPlot + theme_bw()
+#ggsave("Fig4_Compare_sum_model_v1_3_gs.pdf", plot = myDrPlot, dpi = 400)
 
 # 2.0 ----
 myPlot <- ggplot(plotTotalDT[model == "v2_0"], aes(x = obsDate)) +
@@ -949,8 +949,8 @@ myPlot
 ggsave("Fig5_Chart_savings_v1_3_by_month.pdf", plot = myPlot, dpi = 400)
 
 # Grey scale version if required
-myPlot <- myPlot + theme_bw()
-ggsave("Fig5_Chart_savings_v1_3_by_month_gs.pdf", plot = myPlot, dpi = 400)
+#myPlot <- myPlot + theme_bw()
+#ggsave("Fig5_Chart_savings_v1_3_by_month_gs.pdf", plot = myPlot, dpi = 400)
 
 myPlot <- ggplot(plotTotalDT[model == "v2_0"], aes(x = obsDate, y = pcSaved, colour = metered)) + 
   geom_point() +
diff --git a/impetusModel/baselineModel_v2_0.Rmd b/impetusModel/baselineModel_v2_0.Rmd
index 7a8cb104c068492c8c54f77bf16263a3aebb508c..383a984c9251257684e0d49ea3ad9bef959a55c5 100644
--- a/impetusModel/baselineModel_v2_0.Rmd
+++ b/impetusModel/baselineModel_v2_0.Rmd
@@ -798,8 +798,8 @@ myPlot
 ggsave("Fig2_CompareWithEST.pdf",  plot = myPlot, dpi = 400)
 
 # Grey scale version if required
-myPlot <- myPlot + theme_bw()
-ggsave("Fig5_Chart_savings_v1_3_by_month_gs.pdf", plot = myPlot, dpi = 400)
+#myPlot <- myPlot + theme_bw()
+#ggsave("Fig5_Chart_savings_v1_3_by_month_gs.pdf", plot = myPlot, dpi = 400)
 
 ```
 
diff --git a/impetusModel/computeHistoricalMonthly.Rmd b/impetusModel/computeHistoricalMonthly.Rmd
index eb4eec1e29b85a908b2d5b1915a908d09111af6d..b1eecc5892ba30d71f0c6e88b67b0fc93136c4d3 100644
--- a/impetusModel/computeHistoricalMonthly.Rmd
+++ b/impetusModel/computeHistoricalMonthly.Rmd
@@ -820,8 +820,8 @@ myPlot
 ggsave("Fig3_Final_model_v1_3_2012_by_month.pdf", dpi = 400)
 
 # Grey scale version if required
-myPlot <- myPlot + theme_bw()
-ggsave("Fig3_Final_model_v1_3_2012_by_month_gs.pdf", plot = myPlot, dpi = 400)
+#myPlot <- myPlot + theme_bw()
+#ggsave("Fig3_Final_model_v1_3_2012_by_month_gs.pdf", plot = myPlot, dpi = 400)
 ```
 
 ```{r final model v1_3 2012 all dates}