diff --git a/Paper_Figs/f1_boxplots_2.png b/Paper_Figs/f1_boxplots_2.png
new file mode 100644
index 0000000..ccd9b8b
Binary files /dev/null and b/Paper_Figs/f1_boxplots_2.png differ
diff --git a/Paper_Figs/f1_boxplots_3.png b/Paper_Figs/f1_boxplots_3.png
new file mode 100644
index 0000000..4868251
Binary files /dev/null and b/Paper_Figs/f1_boxplots_3.png differ
diff --git a/Paper_Figs/f1_boxplots_4.png b/Paper_Figs/f1_boxplots_4.png
new file mode 100644
index 0000000..36ba669
Binary files /dev/null and b/Paper_Figs/f1_boxplots_4.png differ
diff --git a/Paper_Figs/f1_boxplots_5.png b/Paper_Figs/f1_boxplots_5.png
new file mode 100644
index 0000000..223f21b
Binary files /dev/null and b/Paper_Figs/f1_boxplots_5.png differ
diff --git a/Paper_Figs/f1_boxplots_6.png b/Paper_Figs/f1_boxplots_6.png
new file mode 100644
index 0000000..64bce75
Binary files /dev/null and b/Paper_Figs/f1_boxplots_6.png differ
diff --git a/Paper_Figs/f1_boxplots_7.png b/Paper_Figs/f1_boxplots_7.png
new file mode 100644
index 0000000..3deeb00
Binary files /dev/null and b/Paper_Figs/f1_boxplots_7.png differ
diff --git a/Paper_Figs/f1_boxplots_8.png b/Paper_Figs/f1_boxplots_8.png
new file mode 100644
index 0000000..2928edc
Binary files /dev/null and b/Paper_Figs/f1_boxplots_8.png differ
diff --git a/Paper_Figs/fnr_boxplots_4.png b/Paper_Figs/fnr_boxplots_4.png
new file mode 100644
index 0000000..4129663
Binary files /dev/null and b/Paper_Figs/fnr_boxplots_4.png differ
diff --git a/Paper_Figs/fpr_boxplots_4.png b/Paper_Figs/fpr_boxplots_4.png
new file mode 100644
index 0000000..01d4414
Binary files /dev/null and b/Paper_Figs/fpr_boxplots_4.png differ
diff --git a/Scripts/gea_paper_figures.R b/Scripts/gea_paper_figures.R
index 5c93827..5a66f40 100644
--- a/Scripts/gea_paper_figures.R
+++ b/Scripts/gea_paper_figures.R
@@ -53,7 +53,7 @@ plot_f1 <- function(m, a_min, a_max, iterations_df){
     xlab(" ") + scale_fill_discrete(name = "Method", labels = method_names)
   
   figure_name <- file.path("Paper_Figs", paste0("f1_boxplots_", m, ".png"))
-  ggsave(filename = figure_name, plot = p)
+  ggsave(filename = figure_name, plot = p, height = 10, width = 11.5)
 }
 
 # plot F1 for m = 2-8 using either 10% or 100% additional random genes for 
@@ -73,13 +73,13 @@ plot_fnr <- function(m, a_min, a_max, iterations_df){
   
   p <- ggplot(plot_ready, aes(method, fnr)) +
     geom_boxplot(aes(fill = method)) +
-    facet_grid(percent_addit ~ percent_path) + ylab("False Negative Rate") +
+    facet_grid(percent_addit ~ percent_path) + ylab("False Negative Proportion") +
     theme(axis.title.x = element_blank(), axis.text.x = element_blank(), 
           axis.ticks.x = element_blank()) +
     xlab(" ") + scale_fill_discrete(name = "Method", labels = method_names)
   
   figure_name <- file.path("Paper_Figs", paste0("fnr_boxplots_", m, ".png"))
-  ggsave(filename = figure_name, plot = p)
+  ggsave(filename = figure_name, plot = p, height = 10, width = 11.5)
 }   
   
 plot_fnr(4, .1, 1, iterations_df)  
@@ -94,13 +94,13 @@ plot_fpr <- function(m, a_min, a_max, iterations_df){
   
   p <- ggplot(plot_ready, aes(method, fpr)) +
     geom_boxplot(aes(fill = method)) +
-    facet_grid(percent_addit ~ percent_path) + ylab("False Positive Rate") +
+    facet_grid(percent_addit ~ percent_path) + ylab("False Positive Proportion") +
     theme(axis.title.x = element_blank(), axis.text.x = element_blank(), 
           axis.ticks.x = element_blank()) +
     xlab(" ") + scale_fill_discrete(name = "Method", labels = method_names)
   
   figure_name <- file.path("Paper_Figs", paste0("fpr_boxplots_", m, ".png"))
-  ggsave(filename = figure_name, plot = p)
+  ggsave(filename = figure_name, plot = p, height = 10, width = 11.5)
 }  
   
 plot_fpr(4, .1, 1, iterations_df)