From ba71ef3ff54ce9db10456e254022e990b57c84fc Mon Sep 17 00:00:00 2001 From: victorhartman Date: Fri, 24 May 2024 17:51:17 +0200 Subject: [PATCH] fix facet_wrap title box removing upper box line --- R/theme_apa.R | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/R/theme_apa.R b/R/theme_apa.R index 6c288f92..da0d94ef 100644 --- a/R/theme_apa.R +++ b/R/theme_apa.R @@ -106,7 +106,7 @@ theme_apa <- function(legend.pos = "right", legend.use.title = FALSE, strip.text.x = ggplot2::element_text(size = facet.title.size), # facet labs strip.text.y = ggplot2::element_text(size = facet.title.size), # facet titles - strip.background = ggplot2::element_rect(colour = "white", fill = "white"), + strip.background = ggplot2::element_rect(colour = NA, fill = NA), panel.background = ggplot2::element_rect(fill = "white"), plot.title.position = "panel", # complete = TRUE