This vignette is intended to
demonstrate the functionality of
scale_duke_fill_discrete()
. The function allows users to
utilize a discrete color scale of Duke official branding colors on
ggplot2 visualizations. It is fully integrated with ggplot2
visualizations.
For these visualizations, we will use the penguins
dataset from the palmerpenguins package.
plot <- ggplot(palmerpenguins::penguins, aes(x = species, fill = species)) +
geom_bar() +
labs(title = "Distribution of Species", caption = "(Colors used) \n Duke Royal Blue, Duke Navy Blue, Copper", x = "Species", y = "Count")
plot +
scale_duke_fill_discrete()
plot2 <- ggplot(palmerpenguins::penguins, aes(x = bill_length_mm)) +
geom_histogram(aes(fill = species)) +
labs(title = "Distribution of Bill Length", caption = "(Colors used) \n Duke Royal Blue, Duke Navy Blue, Copper", x = "Bill Length (mm)", y = "Count")
plot2 +
scale_duke_fill_discrete()
#> `stat_bin()` using `bins = 30`. Pick better value with `binwidth`.