Skip to contents

Applies a Duke branded and accessible discrete color palette to ggplot geometric objects using fill argument. It prioritizes high contrast colors aligned with Web Content Accessibility Guidelines (WCAG).

Usage

scale_duke_fill_discrete(..., na.value = "#B5B5B5")

Arguments

...

Arguments passed on to discrete_scale.

na.value

Color used for NA values

Value

a visualization with discrete duke color scale in fill

Examples

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

# default
ggplot(penguins, aes(x = species, fill = species)) +
  geom_bar()


# vs. with Duke scale
ggplot(penguins, aes(x = species, fill = species)) +
  geom_bar() +
  scale_duke_fill_discrete()


# Make some species NAs to demonstrate na.value usage
penguins_with_NAs <- penguins |>
  mutate(species = if_else(species == "Gentoo", NA, species))

# with default na.value
ggplot(penguins_with_NAs, aes(x = species, fill = species)) +
  geom_bar() +
  scale_duke_fill_discrete()


# with custom na.value
ggplot(penguins_with_NAs, aes(x = species, fill = species)) +
  geom_bar() +
  scale_duke_fill_discrete(na.value = "pink")