ggDracula: Dracula for ggplot2
A dark theme for ggplot2 and
R
palette.
Hex image courtesy of DALLΒ·E 2
All instructions can be found at draculatheme.com/ggplot2.
devtools::install_github("dracula/ggplot2")
or
remotes::install_github("dracula/ggplot2")
library(dplyr)
library(ggplot2)
library(ggDracula)
set.seed(1)
ggplot(data.frame(x = rnorm(10000), y = rnorm(10000)), aes(x = x, y = y)) +
geom_hex() + coord_fixed() +
ggtitle("scale_fill_dracula(discrete = FALSE)") +
scale_fill_dracula(discrete = FALSE) + theme_dracula()
library(dplyr)
library(ggplot2)
library(ggDracula)
dsub <- subset(diamonds, x > 5 & x < 6 & y > 5 & y < 6)
dsub$diff <- with(dsub, sqrt(abs(x - y)) * sign(x - y))
ggplot(dsub, aes(x, y, colour = diff)) +
geom_point() +
ggtitle("scale_color_dracula(discrete = FALSE)") +
scale_color_dracula(discrete = FALSE) +
theme_dracula()
library(dplyr)
library(ggplot2)
library(ggDracula)
mpg %>%
filter(manufacturer %in% c("honda", "ford", "dodge", "audi")) %>%
group_by(manufacturer) %>%
summarize(mean_hwy = mean(hwy)) %>%
ggplot(aes(x = manufacturer, y = mean_hwy, fill = manufacturer)) +
ggtitle("scale_fill_dracula(discrete = TRUE)") +
theme_dracula() +
theme(axis.text.y = element_blank(), axis.title.y = element_blank()) +
coord_flip() + geom_col() +
scale_fill_dracula(discrete = TRUE)
This theme is maintained by the following person(s) and a bunch of awesome contributors.
Jordan Bradford |
- Twitter - Best for getting updates about themes and new stuff.
- GitHub - Best for asking questions and discussing issues.
- Discord - Best for hanging out with the community.
See CONTRIBUTING.md
.
I'm indebted to the {viridis} and {wesanderson} R
packages for inspiration and several plot examples.