diff --git a/workflow/apps/r/calculate_interaction_zscores5.R b/workflow/apps/r/calculate_interaction_zscores5.R
index 08a1fbe9..75c82d36 100644
--- a/workflow/apps/r/calculate_interaction_zscores5.R
+++ b/workflow/apps/r/calculate_interaction_zscores5.R
@@ -62,8 +62,11 @@ dir.create(file.path(args$out_dir, "zscores"), showWarnings = FALSE)
 dir.create(file.path(args$out_dir, "zscores", "qc"), showWarnings = FALSE)
 
 # Define themes and scales
-theme_publication <- function(base_size = base_size, base_family = "sans", legend_position = "bottom") {
-  theme_foundation(base_size = base_size, base_family = base_family) +
+# Define themes and scales
+theme_publication <- function(base_size = 14, base_family = "sans", legend_position = "bottom") {
+  theme_foundation <- ggplot2::theme_grey(base_size = base_size, base_family = base_family)
+  
+  theme_foundation %+replace%
     theme(
       plot.title = element_text(face = "bold", size = rel(1.2), hjust = 0.5),
       text = element_text(),
@@ -85,6 +88,7 @@ theme_publication <- function(base_size = base_size, base_family = "sans", legen
     )
 }
 
+
 scale_fill_publication <- function(...) {
   discrete_scale("fill", "Publication", manual_pal(values = c(
     "#386cb0", "#fdb462", "#7fc97f", "#ef3b2c", "#662506",