theme_td: Add the base theme from dunnr to a ggplot

In taylordunn/dunnr: Personal R Package of Taylor Dunn

Add the base theme from dunnr to a ggplot

Description

A simple plotting theme with a half-open frame and no gridlines. Heavily inspired by cowplot::theme_half_open(). It uses Roboto Condensed as the default font, which may be changed with the base_family argument.

Usage

theme_td(
  base_size = 12,
  base_family = "Roboto Condensed",
  base_line_size = base_size/24
)

Arguments

base_size	base font size in pts.
base_family	base font family.
base_line_size	base size for line elements.

Value

The complete theme.

Examples

library(ggplot2)
library(palmerpenguins)
library(dplyr)

# Load the default font (Roboto Condensed)
extrafont::loadfonts(quiet = TRUE)

p <- penguins %>%
  filter(!is.na(bill_length_mm)) %>%
  ggplot(aes(x = bill_length_mm, y = bill_depth_mm, color = species)) +
  geom_point(aes(shape = species), size = 3, alpha = 0.7) +
  geom_smooth(method = "lm", formula = "y ~ x", se = FALSE) +
  scale_color_brewer(palette = "Set1") +
  labs(
    title = "Penguin bill dimensions",
    subtitle = "Bill length and depth for different penguin species",
    x = "Bill length (mm)", y = "Bill depth (mm)",
    color = "Penguin species", shape = "Penguin species",
    caption = "Data from the palmerpenguins package"
  ) +
  facet_wrap(~species, nrow = 1)

p + theme_td()

taylordunn/dunnr documentation built on Aug. 8, 2022, 12:28 p.m.