https://github.com/GuangchuangYu/hexSticker

:sparkles: Hexagon sticker in R
https://github.com/GuangchuangYu/hexSticker
ggplot2 hexagon-sticker logo rstats stickers visualization
Last synced: 7 months ago
JSON representation
:sparkles: Hexagon sticker in R
Host: GitHub
URL: https://github.com/GuangchuangYu/hexSticker
Owner: GuangchuangYu
Created: 2017-03-13T03:23:54.000Z (over 8 years ago)
Default Branch: master
Last Pushed: 2024-03-19T01:08:22.000Z (over 1 year ago)
Last Synced: 2024-04-26T07:45:23.836Z (over 1 year ago)
Topics: ggplot2, hexagon-sticker, logo, rstats, stickers, visualization
Language: R
Homepage:
Size: 22.2 MB
Stars: 719
Watchers: 16
Forks: 161
Open Issues: 16
Metadata Files:
- Readme: README.Rmd
Awesome Lists containing this project

jimsghstars - GuangchuangYu/hexSticker - :sparkles: Hexagon sticker in R (R)
README

          

# hexSticker: create hexagon sticker in R

[![CRAN_Status_Badge](http://www.r-pkg.org/badges/version/hexSticker?color=green)](https://cran.r-project.org/package=hexSticker)

[![](http://cranlogs.r-pkg.org/badges/grand-total/hexSticker?color=green)](https://cran.r-project.org/package=hexSticker)

[![](http://cranlogs.r-pkg.org/badges/hexSticker?color=green)](https://cran.r-project.org/package=hexSticker)

[![](http://cranlogs.r-pkg.org/badges/last-week/hexSticker?color=green)](https://cran.r-project.org/package=hexSticker)

```{r echo=FALSE, results="hide", message=FALSE}

library("hexSticker")

```

## :writing_hand: Author

Guangchuang YU 

School of Basic Medical Sciences, Southern Medical University

[![saythanks](https://img.shields.io/badge/say-thanks-ff69b4.svg)](https://saythanks.io/to/GuangchuangYu)

`r badger::badge_custom("follow me on", "WeChat", "green", "https://guangchuangyu.github.io/blog_images/biobabble.jpg")`

----

## :arrow_double_down: Installation

Install the hexSticker package via CRAN:

```{r, eval=FALSE}

install.packages("hexSticker")

```

You can also install the package via the Github repository.

```{r, eval=FALSE}

# install.package("remotes")   #In case you have not installed it.

remotes::install_github("GuangchuangYu/hexSticker")

```

## Fail to install

### imageMagick

`imageMagick` is required for installing `hexSticker`.  If you have not installed it, please try the following [approaches](https://www.imagemagick.org/script/download.php).

### Fail to load 'sysfonts'

In Mac OS, you may need to re-install `sysfont` to properly load it.

Be sure to install `xquartz` first.

```{r, eval=FALSE}

brew update && brew install homebrew/cask/xquartz

```

---

## Examples

> `sticker` function will produce a file with dimension exactly for printing according to

> 

### base plot

```{r eval=FALSE}

library(hexSticker)

s <- sticker(~plot(cars, cex=.5, cex.axis=.5, mgp=c(0,.3,0), xlab="", ylab=""),

          package="hexSticker", p_size=20, s_x=.8, s_y=.6, s_width=1.4, s_height=1.2,

          filename="inst/figures/baseplot.png")

```

The `sticker()` will generate a figure specified by the `filename` parameter. The output of the `sticker()` function is a `ggplot` object, e.g. the `s` variable in the above example. Print the object, `print(s)`,  will display the image. However, the image may slightly different from the created image file since the graphic device size are different. To solve this issue, `hexSticker` package provides `plot` function to preview sticker. Try `plot(s)` :).



### lattice

```{r fig.keep="none", eval=F}

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=20, s_x=1.05, s_y=.8, s_width=2, s_height=1.5,

        h_fill="#f9690e", h_color="#f39c12", filename="inst/figures/lattice.png")

```



### ggplot2

```{r fig.keep="none", eval=F}

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=20, s_x=1, s_y=.75, s_width=1.3, s_height=1,

        filename="inst/figures/ggplot2.png")

```



### image file

```{r fig.keep="none", message=FALSE, eval=FALSE}

imgurl <- system.file("figures/cat.png", package="hexSticker")

sticker(imgurl, package="hexSticker", p_size=20, s_x=1, s_y=.75, s_width=.6,

        filename="inst/figures/imgfile.png")

```



### Google fonts

```{r eval=FALSE}

library(showtext)

## Loading Google fonts (http://www.google.com/fonts)

font_add_google("Gochi Hand", "gochi")

## Automatically use showtext to render text for future devices

showtext_auto()

## use the ggplot2 example

sticker(p, package="hexSticker", p_size=22, s_x=1, s_y=.75, s_width=1.3, s_height=1,

        p_family = "gochi", filename="inst/figures/ggplot2-google-font.png")

```



----

## :sparkling_heart: Stickers produced by `hexSticker`

> If you use `hexSticker` and want your sticker to be listed here,

> please feel free to edit [README.Rmd](https://github.com/GuangchuangYu/hexSticker/edit/master/README.Rmd),

> and run `rmarkdown::render("README.Rmd", rmarkdown::md_document(variant = "gfm"))` in `R` to generate `README.md`.

**Please put stickers in alphabet order.**

### Stickers for software packages

[](https://github.com/furrer-lab/abn)

[](https://github.com/Bioconductor/BiocStickers/tree/master/AnnotationFilter)

[](https://github.com/lpantano/bcbioSmallRna)

[](https://github.com/bcgov/bcmaps)

[](https://github.com/danielmarcelino/CamaraBR)

[](https://github.com/GuangchuangYu/ChIPseeker)

[](https://github.com/Bioconductor/BiocStickers/tree/master/cleaver)

[](https://github.com/GuangchuangYu/clusterProfiler)

[](https://github.com/SGS2000/ClustMC)

[](https://github.com/stevecondylios/collidr)

[](https://github.com/RhoInc/CRANsearcher)

[](https://github.com/sstoeckl/crypto2)

[](https://github.com/nathansam/DatefixR)

[](https://cran.r-project.org/web/packages/decisionSupport/index.html)

[](https://github.com/lpantano/DEGreport)

[](https://github.com/villegar/dive)

[](https://github.com/tbradley1013/dragondown)

[](https://github.com/calcita/ech)

[](https://github.com/mrchypark/elbird)

[](https://github.com/Waller-SUSAN/envi)

[](https://github.com/asilatakarandikar/eparlibscrapR/)

[](https://github.com/CWWhitney/ethnobotanyR)

[](https://github.com/Bioconductor/BiocStickers/tree/master/FamAgg)

[](https://lschneiderbauer.github.io/fCWTr/)

[](https://github.com/sstoeckl/ffdownload)

[](https://github.com/wangjiaxuan666/fixbatch)

[](https://github.com/JeffreyRStevens/flashr)

[](https://github.com/Waller-SUSAN/gateR)

[](https://github.com/Matheusbp/GemirTools)

[](https://github.com/ipeaGIT/geobr)

[](https://github.com/RichDeto/geouy)

[](https://www.samabbott.co.uk/getTBinR/)

[](https://github.com/strengejacke/ggeffects)

[](https://rivasiker.github.io/ggHoriPlot/)

[](https://github.com/mikmart/ggragged)

[](https://github.com/botan/ggrounded)

[](https://github.com/GuangchuangYu/ggtree)

[](https://github.com/MEDSL/ggmedsl)

[](https://github.com/dieghernan/giscoR)

[](https://github.com/muschellij2/glassdoor)

[](https://github.com/montesmariana/glossr)

[](https://github.com/greta-dev/greta/tree/master/logos)

[](https://github.com/calvinmfloyd/grobblR)

[](https://github.com/mikemahoney218/heddlr)

[](https://github.com/dieghernan/igoR)

[](https://github.com/SteffenMoritz/imputeR)

[](https://github.com/lpantano/isomiRs)

[](https://github.com/igorlaltuf/ispdata)

[](https://github.com/wjakethompson/jayhawkdown)

[](https://github.com/graemeleehickey/joineR)

[](https://github.com/graemeleehickey/joineRML)

[](https://github.com/juliasilge/janeaustenr/tree/master/tools)

[](https://cran.r-project.org/package=JSUparameters)

[](https://le-huynh.github.io/lehuynh/)

[](https://github.com/nelson-n/lmForc)

[](https://github.com/ryansar/lungct)

[](https://github.com/nlmixrdevelopment/lotri)

[](https://github.com/paezha/macdown)

[](https://github.com/rOpenSpain/mapSpain)

[](https://github.com/gpaux/Mediana)

[](https://github.com/nrennie/messy)

[](https://github.com/nvietto/movienight)

[](https://github.com/keblu/MSGARCH)

[](https://github.com/Bioconductor/BiocStickers/tree/master/MSnbase)

[](https://github.com/Bioconductor/BiocStickers/tree/master/mzR)

[](https://github.com/lbenz730/ncaahoopR)

[](https://github.com/asancpt/ncarbe)

[](https://mirkosignorelli.github.io/r.html)

[](https://github.com/stevecondylios/netstat)

[](https://github.com/nhs-r-community/NHSRdatasets)

[](https://github.com/nhs-r-community/NHSRepisodes)

[](https://github.com/nhs-r-community/NHSRplotthedots)

[](https://github.com/nhs-r-community/NHSRtheme)

[](https://github.com/asancpt/NonCompart)

[](https://github.com/nvietto/nopunintended)

[](https://github.com/covid19br/nowcaster)

[](https://github.com/emsweene/oasis)

[](https://github.com/StatsGary/OddsPlotty)

[](https://github.com/EnriquePH/OEIS.R)

[](https://github.com/ox-it/oidnChaRts/tree/master/data-raw)

[](http://github.com/RGLab/openCyto)

[](https://github.com/DARTH-git/OpenTree)

[](https://github.com/cosimameyer/overviewR)

[](https://mirkosignorelli.github.io/r.html)

[](https://github.com/cbg-ethz/perturbatr)

[](https://uptake.github.io/pkgnet/)

[](https://github.com/dmi3kno/polite)

[](https://github.com/nrennie/PrettCyCols)

[](https://github.com/Bioconductor/BiocStickers/tree/master/pRoloc)

[](https://github.com/Bioconductor/BiocStickers/tree/master/pRoloc)

[](https://github.com/Bioconductor/BiocStickers/tree/master/pRoloc)

[](https://mirkosignorelli.github.io/r.html)

[](https://github.com/Yue-Jiang/pzfx)

[](https://github.com/justinmillar/r-gators-hex)

[](https://github.com/jorvlan/raincloudplots)

[](https://github.com/stevecondylios/rawr)

[](https://github.com/jwood000/RcppAlgos)

[](https://github.com/nvietto/Rdune)

[](https://github.com/potterzot/rnassqs)

[](https://github.com/prdm0/ropenblas)

[](https://github.com/ellessenne/rsimsum)

[](https://github.com/nrennie/RSSthemes)

[](https://github.com/QiHongchao/SampleSize4ClinicalTrials)

[](https://github.com/nvietto/samplezoo)

[](https://github.com/SchlossLab/schtools)

[](https://github.com/thiyangt/seer/raw/master/logo/seer.png)

[](https://github.com/sborms/sentometrics)

[](https://github.com/IyarLin/simMixedDAG)

[](https://github.com/Bohdan-Khomtchouk/shinyheatmap)

[](https://github.com/cwthom/shinyhelper)

[](https://github.com/ShixiangWang/sigminer)

[](https://github.com/strengejacke/sjmisc)

[](https://github.com/strengejacke/sjPlot)

[](https://github.com/strengejacke/sjstats)

[](https://github.com/Tazinho/snakecase)

[](https://github.com/danielmarcelino/SoundexBR)

[](https://github.com/pdrhlik/southparkr)

[](https://github.com/rOpenSpain/spanish)

[](https://github.com/machiela-lab/sparrpowR)

[](https://github.com/HaydenMacDonald/squashinformr)

[](https://github.com/rrrlw/TDAstats)

[](https://github.com/rOpenSpain/mapSpain)

[](https://github.com/taxonomicallyinformedannotation/tima-r)

[](https://www.bioconductor.org/packages/treeio)

[](https://github.com/wenlong-liu/usfertilizer)

[](https://github.com/sjmgarnier/viridis)

[](https://github.com/neuroconductor/WhiteStripe)

[](https://github.com/JaseZiv/worldfootballR)

[](https://github.com/Bioconductor/BiocStickers/tree/master/xcms)

[](https://github.com/drisso/zinb_analysis/tree/master/sticker)

### Stickers for events/workshops

[](https://github.com/MonkmanMH/UVic_BIDA302)

[](https://github.com/Bioconductor/BiocStickers/tree/master/events/CSAMA/2017)

[](https://jeffreyrstevens.quarto.pub/dpavir/)

### Stickers for fun

[](https://github.com/MonkmanMH/EIKIFJB)

[](https://www.karada-good.net/analyticsr/r-584)

### Stickers for organizations

[](https://github.com/cryptokor)

[](https://www.mzes.uni-mannheim.de/socialsciencedatalab/)

[](https://github.com/MEDSL/)

[](https://github.com/shinycrypto)

[](https://github.com/slc-rug/slcrug-hexsticker)

## Print/order stickers

Sticker designers can make their stickers available via [Sticker Mule](https://www.stickermule.com/uses/hexagon-stickers).

## Related Tools

+ [badger](https://github.com/GuangchuangYu/badger): Query information and generate badge for using in README and GitHub Pages.

+ [ggimage](https://github.com/GuangchuangYu/ggimage): Supports image files and graphic objects to be visualized in 'ggplot2' graphic system.

+ [meme](https://github.com/GuangchuangYu/meme/): Create Meme.

+ [shadowtext](https://github.com/GuangchuangYu/shadowtext/): Create text grob with background shadow.
ecosyste.ms

Data

Tools

Indexes

Applications

Experiments

Awesome

https://github.com/GuangchuangYu/hexSticker

Awesome Lists containing this project

README
