tools/sticker.R

In cbl-imagine/CellID: Unbiased Extraction of Single Cell Identity using Multiple Correspondence Analysis

install.packages("hexSticker")
library(hexSticker)
imgurl <- "cell"
sticker(
    imgurl,
    package = "CellID",
    p_size = 16,
    s_x = 1,
    s_y = .8,
    s_width = 0.3,
    s_height = 0.3,
    h_fill = "red",
    p_color = "yellow",
    h_color = "yellow",
    filename = "misc/baseplot.png"
)