knitr::opts_chunk$set(
  warning = FALSE,
  message = FALSE,
  comment = FALSE
)

This post shows how to append the USSC logo to ggplot2 graphs.

library('tidyverse')
library('ussc')
# set up the ggplot2 object
p1 <- ggplot(mtcars) +
  geom_point(aes(mpg, disp, color = cyl), show.legend = FALSE) + 
  facet_grid(~cyl) + 
  scale_colour_ussc(discrete = FALSE) + 
  labs(title = "Halis",
       caption = "AbcXyz") + 
  theme_ussc()

Overlay the logo as follows:

plot_ussc_logo(p1, "top-right")
plot_ussc_logo(p1, "bottom-center")


USStudiesCentre/ussc documentation built on Sept. 2, 2020, 2:51 p.m.