p <- ggplot2::qplot(1:10, 1:10) + ggplot2::theme(plot.title = ggplot2::element_text(size = 13))
GGally:::first_non_null(GGally:::get_theme_element(p, "plot.title", "size"), 15)
GGally:::first_non_null(GGally:::get_theme_element(p, "plot.title", "BAD"), 15)
Run the code above in your browser using DataLab