New themes

[davidhodge931]

[davidhodge931]

[davidhodge931]

[davidhodge931]

library(tidyverse)
library(ggblanket)
library(palmerpenguins)
library(patchwork)

penguins |>
  drop_na() |> 
  mutate(across(sex, \(x) str_to_sentence(x))) |> 
  gg_histogram(
    x = flipper_length_mm,
    col = species,
    title = "Penguin flipper length by species",
    subtitle = "Palmer Archipelago, Antarctica",
    caption = "Source: Gorman, 2020", 
    col_title = "",
    theme = grey_mode_t(),
  ) 

penguins |>
  drop_na() |> 
  mutate(across(sex, \(x) str_to_sentence(x))) |> 
  gg_histogram(
    x = flipper_length_mm,
    col = species,
    title = "Penguin flipper length by species",
    subtitle = "Palmer Archipelago, Antarctica",
    caption = "Source: Gorman, 2020", 
    col_title = "",
    theme = light_mode_t(),
  ) 

penguins |>
  drop_na() |> 
  mutate(across(sex, \(x) str_to_sentence(x))) |> 
  gg_histogram(
    x = flipper_length_mm,
    col = species,
    title = "Penguin flipper length by species",
    subtitle = "Palmer Archipelago, Antarctica",
    caption = "Source: Gorman, 2020", 
    col_title = "",
    theme = dark_mode_t(),
  )