Ecosyste.ms: Awesome
An open API service indexing awesome lists of open source software.
https://github.com/xvzftube/darknerdthemes
Dark ggplots themes for nerds
https://github.com/xvzftube/darknerdthemes
Last synced: 2 days ago
JSON representation
Dark ggplots themes for nerds
- Host: GitHub
- URL: https://github.com/xvzftube/darknerdthemes
- Owner: xvzftube
- Created: 2022-11-15T03:10:08.000Z (about 2 years ago)
- Default Branch: main
- Last Pushed: 2023-11-06T01:31:33.000Z (about 1 year ago)
- Last Synced: 2024-08-03T23:24:24.380Z (3 months ago)
- Language: R
- Size: 321 KB
- Stars: 2
- Watchers: 1
- Forks: 0
- Open Issues: 0
-
Metadata Files:
- Readme: README.md
Awesome Lists containing this project
README
#darknerdthemes
I like to use dark themes when working. I like `gruvebox`, `nord`, and `everforest`. I think darkthemes could use a little more representation in the ggplot2 community. I do not follow the above themes strictly, I just hope to generate sensible dark themes. Please fork and make your own variations.
# Example
```r
# install
devtools::install_github("https://github.com/xvzftube/darknerdthemes")# load
library(darknerdthemes)
library(ggplot2)# example 1
p <- ggplot(mpg, aes(displ, hwy, color = class)) +
geom_point() +
nerd_theme_gruv() +
scale_color_nerd(palette = "main")
ggsave('ex1.jpg', p, width = 8, height = 8)# example 2
p <- ggplot(mpg, aes(displ, hwy, color = class)) +
geom_point() +
nerd_theme_nord()+
scale_color_nerd(palette = "nord aurora")
ggsave('ex2.jpg', p, width = 8, height = 8)# example 3
p <- ggplot(mpg, aes(displ, hwy, color = class)) +
geom_point() +
nerd_theme_nord()+
scale_color_nerd(palette = "nord frost")
ggsave('ex3.jpg', p, width = 8, height = 8)# example 4
p <- ggplot(mpg, aes(displ, hwy, color = class)) +
geom_point() +
nerd_theme_everforest()+
scale_color_nerd(palette = "everforest")
ggsave('ex4.jpg', p, width = 8, height = 8)# example 5
p <- ggplot(mpg, aes(displ, hwy, color = class)) +
geom_point() +
nerd_theme_gruv()
ggsave('ex5.jpg', p, width = 8, height = 8)# example 6
p <- ggplot(mpg, aes(displ, hwy, color = class)) +
geom_point() +
nerd_theme_xvzf() +
scale_color_nerd(palette = "xvzf")
ggsave('ex6.jpg', p, width = 8, height = 8)```
## Example 1![Example 1](ex1.jpg)
## Example 2
![Example 2](ex2.jpg)
## Example 3
![Example 3](ex3.jpg)
## Example 4
![Example 4](ex4.jpg)
## Example 5
![Example 5](ex5.jpg)