VapoRwave Themes
Contact: - Twitter - GitHub - Personal Website
Table of Contents
Overview
vapoRwave is an R package that provides ggplot2 themes inspired by
the vaporwave movement, a genre of electronic music and art
characterized by nostalgic and satirical takes on consumer capitalism,
glitch art, anime, 3D-rendered objects, and cyberpunk tropes.
Explore the aesthetics of vaporwave through themes that mimic iconic album covers and visual styles.
Installation
Use the devtools package to install it.
devtools::install_github("moldach/vapoRwave")
# To include the vignette
devtools::install_github("moldach/vapoRwave", build_vignettes=TRUE)Load packages:
library(vapoRwave)
library(ggplot2)
library(extrafont)Windows Font Installation
While Ubuntu users can effortlessly install fonts, Windows users are required to take an additional step to utilize the fonts provided.
The fonts from the vapoRwave package will be locally installed in
C:\Windows\Users\<username>\MyFonts\. To use them, move/copy the fonts
to Control Panel -> Appearance and Personalization -> Fonts.
After each new R session, execute the following commands to make the fonts available:
library(extrafont)
# Import the TrueType fonts
font_import(paths = "C:/Windows/Fonts/", recursive = TRUE)Select Y to continue:
Themes
Floral Shoppe
ggplot(mpg, aes(displ)) +
geom_histogram(aes(fill=class),
binwidth = .1,
col="black",
size=.1) + # change binwidth
labs(title="Floral Shoppe",
subtitle="Engine Displacement across Vehicle Classes") + floral_shoppe() + scale_fill_floralShoppe()
New Retro Wave
options(scipen=999) # turn-off scientific notation like 1e+48
data("midwest", package = "ggplot2")
ggplot(midwest, aes(x=area, y=poptotal)) +
geom_point(aes(col=state, size=popdensity)) +
geom_smooth(method="loess", se=F, color = "#FA5F70FF") +
xlim(c(0, 0.1)) +
ylim(c(0, 500000)) +
labs(subtitle="Area Vs Population",
y="Population",
x="Area",
title="New Retro Theme",
caption = "Source: midwest") +
new_retro() +
scale_colour_newRetro() +
guides(size = guide_legend(override.aes = list(colour = "#FA5F70FF")))
JWZ
ggplot(mpg, aes(class, cty)) +
geom_boxplot(aes(fill=factor(cyl))) +
theme(axis.text.x = element_text(angle=65, vjust=0.6)) +
labs(title="Box plot",
subtitle="City Mileage grouped by Class of vehicle",
caption="Source: mpg",
x="Class of Vehicle",
y="City Mileage") +
jwz() +
scale_fill_jwz()
Vignettes
For more advanced and complex use-cases, as well as detailed examples
and customization options, refer to the vapoRwave
vignette. The vignette explore diverse demos that
include information on various palletes, fonts, changing parameters, and
integrating with extensions. For a comprehensive guide, consult the
vignette for the full potential of the vapoRwave package.
When users install tha package and want to access the vignettes, they can use the following command to open them:
library(vapoRwave)
browseVignettes("vapoRwave")Contributing
Please read CONTRIBUTING.md for details on our code of conduct, and the process for submitting pull requests to us.
License
This code is released under the MIT License - see the LICENSE.md file for details.