diff --git a/inst/hex/6MGSw0KSM8oqk8c6AsK8WocW2.jpg b/inst/hex/6MGSw0KSM8oqk8c6AsK8WocW2.jpg
new file mode 100644
index 0000000..97c0550
Binary files /dev/null and b/inst/hex/6MGSw0KSM8oqk8c6AsK8WocW2.jpg differ
diff --git a/inst/hex/hex.png b/inst/hex/hex.png
new file mode 100644
index 0000000..6897f92
Binary files /dev/null and b/inst/hex/hex.png differ
diff --git a/inst/hex/hexSticker.Rmd b/inst/hex/hexSticker.Rmd
new file mode 100644
index 0000000..1461728
--- /dev/null
+++ b/inst/hex/hexSticker.Rmd
@@ -0,0 +1,89 @@
+---
+title: "hexSticker"
+date: "
Updated: `r format( Sys.Date(), '%b-%d-%Y')`
"
+output:
+ BiocStyle::html_document
+vignette: >
+ %\VignetteIndexEntry{hexSticker}
+ %\VignetteEngine{knitr::rmarkdown}
+ %\VignetteEncoding{UTF-8}
+---
+
+```{r setup, echo=FALSE, include=TRUE}
+pkg <- read.dcf(here::here("DESCRIPTION"), fields = "Package")[1]
+description <- read.dcf(here::here("DESCRIPTION"), fields = "Description")[1]
+
+# If you're using R<4.1.1, need this version of rvcheck
+# devtools::install_version('rvcheck',version='0.1.8')
+library(hexSticker)
+library(dplyr)
+library(ggplot2)
+library(ggimage)
+# library(ggpattern)# remotes::install_github("coolbutuseless/ggpattern")
+```
+
+You can make awesome hex stickers for your R packages using:
+
+- [hexSticker](https://github.com/GuangchuangYu/hexSticker)
+- [ggimage](https://github.com/GuangchuangYu/ggimage)
+lets you render images as data points.
+- [ggpattern](https://coolbutuseless.github.io/package/ggpattern/)
+lets you fill objects with patterns or images.
+- [magick](https://cran.r-project.org/web/packages/magick/vignettes/intro.html)
+modify PNGs.
+
+# `r pkg`
+
+## File path
+
+Create file path to save hex sticker to.
+
+```{r}
+filename <- here::here("inst/hex/hex.png")
+dir.create(dirname(filename), showWarnings = FALSE, recursive = TRUE)
+```
+
+## Subplot
+
+```{r}
+# URL <- "https://github.com/NathanSkene/EWCE/releases/download/v1.1/DALL.E.2023-03-10.01.14.58.-.cell.type.specific.gene.enrichment.png"
+# tmp <- tempfile(fileext = ".png")
+# utils::download.file(URL, tmp)
+
+tmp <- here::here("inst/hex/6MGSw0KSM8oqk8c6AsK8WocW2.jpg")
+```
+
+
+
+## hexSticker
+
+```{r}
+# pkg <- paste("E xpression","W eighted","C elltype","E nrichment", sep = "
")
+
+s_size = .35
+stick <- hexSticker::sticker(
+ subplot = tmp,
+ #### Package name ####
+ package = paste0(strsplit(pkg, " ")[[1]],collapse = " "),
+ p_size=15, p_y = 1.5, p_color = ggplot2::alpha("white",.95),
+ #### Subplot #####
+ s_x=1, s_y=.8, s_height = s_size, s_width = s_size*2.4,
+ #### Fill & border ####
+ h_fill = "#9ca9b6", h_color =ggplot2::alpha("white",.5),h_size = 3,
+ #### Spotlight ####
+ spotlight = TRUE, l_alpha = .2, l_width = 5, l_x = .5,
+ #### File output ####
+ white_around_sticker = TRUE,
+ filename = filename, dpi = 300)
+print(stick)
+```
+
+# Session Info
+
+
+
+```{r Session Info}
+utils::sessionInfo()
+```
+
+