Helper functions for creating reproducible hexagon sticker purely in R.
Guangchuang YU https://guangchuangyu.github.io
School of Basic Medical Sciences, Southern Medical University
Install the hexSticker package via CRAN:
install.packages("hexSticker")
You can also install the package via the Github repository.
# install.package("devtools") #In case you have not installed it.devtools::install_github("GuangchuangYu/hexSticker")
imageMagick
is required for installing hexSticker
. If you have not
installed it, please try the following
approaches.
In Mac OS, you may need to re-install sysfornt
to properly load it.
Be sure to install xqartz
first.
brew update && brew install homebrew/cask/xquartz
printing according to http://hexb.in/sticker.html
library(hexSticker)sticker(expression(plot(cars, cex=.5, cex.axis=.5, mgp=c(0,.3,0), xlab="", ylab="")),package="hexSticker", p_size=8, s_x=1, s_y=.8, s_width=1.2, s_height=1,filename="inst/figures/baseplot.png")
library(lattice)counts <- c(18,17,15,20,10,20,25,13,12)outcome <- gl(3,1,9)treatment <- gl(3,3)bwplot <- bwplot(counts ~ outcome | treatment, xlab=NULL, ylab=NULL, cex=.5,scales=list(cex=.5), par.strip.text=list(cex=.5))sticker(bwplot, package="hexSticker", p_size=8, s_x=1.05, s_y=.75, s_width=2, s_height=1.5,h_fill="#f9690e", h_color="#f39c12", filename="inst/figures/lattice.png")
library(ggplot2)p <- ggplot(aes(x = mpg, y = wt), data = mtcars) + geom_point()p <- p + theme_void() + theme_transparent()sticker(p, package="hexSticker", p_size=8, s_x=1, s_y=.75, s_width=1.3, s_height=1,filename="inst/figures/ggplot2.png")
imgurl <- "http://www.belleamibengals.com/bengal_cat_2.png"sticker(imgurl, package="hexSticker", p_size=8, s_x=1, s_y=.75, s_width=.6,filename="inst/figures/imgfile.png")
hexSticker
If you use
hexSticker
and want your sticker to be listed here, please feel free to edit README.Rmd, and runrmarkdown::render("README.Rmd")
inR
to generateREADME.md
.
Please put stickers in alphabet order.
Sticker designers can make their stickers available via Sticker Mule.
o dpi paramter in sticker <2018-09-10, Mon> o ... parameter in save_sticker <2018-09-03, Mon>
o update code according to the change of geom_subview <2017-11-22, Wed>
o remove ggforce dependency <2017-06-19, Mon>
o URL at lower border of sticker <2017-04-19, Wed>
o bug fixed of whiteTrans <2017-04-19, Wed>
o support spotlight <2017-04-05, Wed>
o geom_hexagon, geom_pkgname, theme_sticker <2017-03-21, Tue> o use ggimage::geom_subview and ggimage::geom_image <2017-03-21, Tue>
o support select font typeface <2017-03-15, Wed>
o initial version based on my script to generate ggtree sticker <2017-03-13, Mon>