I have a list of data frames that I use to make a list of ggplot
s, and then assemble into a grid of plots with cowplot
. I need to then attach a sha
Like so?
library(ggplot2)
library(cowplot)
theme_georgia <- function(...) {
theme_gray(base_family = "Georgia", ...) +
theme(plot.title = element_text(face = "bold"))
}
title_theme <- calc_element("plot.title", theme_georgia())
ggdraw() +
draw_label(
"Socio-economic measures",
fontfamily = title_theme$family,
fontface = title_theme$face,
size = title_theme$size
)
Created on 2018-06-21 by the reprex package (v0.2.0).