geom_glowing_area: A Cyberpunk styled area chart

Description Usage Arguments Details Value Examples

View source: R/cyberpunk_geoms.R

Description

Glowing Lines, lightly colored area plots for a cyberpunk area plot.

Usage

1
geom_glowing_area(alpha =  1, size = 1.5, glow_alpha = 0.05, layers = 10, glow_size = .65)

Arguments

alpha

set the alpha level for the base line.

size

set the base line size.

glow_alpha

alpha level for the glow effect

layers

number of glowing layers to draw,

glow_size

size of the glow

Details

Create a cyberpunk themed chart using ggplot. This plot is a fancy area plot, that uses a glow effect around the upper line.

Value

A list of ggplot geoms containin geom_area, geom_lines, and geom_point.

Examples

 1
 2
 3
 4
 5
 6
 7
 8
 9
10
11
12
13
14
15
16
17
18
## Not run: 
library(ggplot2)
library(tidyverse)

df = data.frame(A=c(1,4,4,6,7,5,1),
               B=c(4,3,5,7,5,6,7),
               I=c(1,2,3,4,5,6,7)) %>%
pivot_longer(cols = c(A,B),names_to = "group", values_to = "count")


df %>%
   ggplot(aes(x=I, y = count, color = group, fill= group))+
     geom_glowing_area()+
     theme_cyberpunk()+
     scale_fill_manual(values = c("#08F7FE", "#FE53BB"))+
     scale_color_manual(values = c("#08F7FE", "#FE53BB"))

## End(Not run)

delabj/ggCyberPunk documentation built on Nov. 17, 2021, 7:40 p.m.