Set Up

# make fake data for plots ----
points <- data.frame(x = 1:10, y = 1:10)
g_points <- ggplot(points, aes(x, y, col = factor(x))) + geom_point(size = 5)

Motivation for this Theme

ADD SOMETHING HERE!

Plot Theme

To understand this theme, first consider this basic ggplot.

g_points

Here is what my theme looks like.

g_points + 
  labs(title = "My fancy plot") +
  unhcr_style_scatter()

It also pairs nicely with this palette.

g_points + 
  scale_color_discrete_unhcr(palette = "test", extend = TRUE) + 
  labs(title = "My fancy plot") +
  unhcr_style_scatter()