ggecho
ggecho
is a ggplot2
Stat which echoes the plotting data.
This can be used to create a blur effect for geom_point()
, geom_line()
and geom_text()
(and probably
some other geoms where the size
parameter directly determines the area of the displayed element).
This ggplot2 stat works by duplicating/echoing the original data passed to ggplot, and adjusting each data echo by:
- size (
size_increment
), - alpha (
alpha_factor
), and - position (
x_offset
&y_offset
)
This package wouldn’t be possible without:
- ggplot2 by Hadley Wickham
- Brodie Gaslam’s great guide to ggplot2 internals
- boBRudis’s post on demystifying ggplot2
Installation
You can install thedevelopment version from GitHub with:
# install.packages("remotes")
remotes::install_github("coolbutuseless/ggecho")
Simple blurred points and lines
This is a basic example which shows you how to solve a common problem:
library(ggecho)
ggplot(mtcars) +
geom_point(aes(mpg, wt, size = disp), stat = "echo") +
theme_bw() +
theme(legend.position = 'none')
ggplot(mtcars) +
geom_line(aes(mpg, wt, colour = as.factor(am)), stat = "echo") +
theme_bw() +
theme(legend.position = 'none')
ggplot(mtcars) +
stat_echo(aes(mpg, wt, size = disp), geom = "point", size_increment = 2, alpha_factor = 0.5,
x_offset = 0.5, y_offset = 1, n = 10) +
theme_bw() +
theme(legend.position = 'none')
Blurred text
text_df <- data.frame(x = c(0.3, 0.7), y = c(0.25, 0.25), label = c('hello', '#rstats'))
ggplot(text_df) +
geom_text(aes(x, y, label = label), size = 20, stat = 'echo',
size_increment = 2, y_offset = 0.0, n = 20, alpha_factor = 0.6) +
theme_void() +
xlim(0.1, 0.9) + ylim(0.1, 0.4)