Ink bleed effect

Simulates ink bleeding into paper fibers.

Usage

patina_ink_bleed(
  img,
  radius = 2,
  expand = 1,
  strength = 0.5,
  bleed_color = "#2a2a2a",
  paper_texture = NULL
)

Arguments

img

magick image (from as_magick)

radius

feather (sigma) in px for the bleed falloff

expand

dilation (px) to push the bleed outward from strokes

strength

0..1 overall opacity of the bleed layer

bleed_color

bleed/tint color

paper_texture

optional texture laid UNDER the plot

Examples

if (FALSE) { # \dontrun{
if (requireNamespace("magick", quietly = TRUE)) {
  img <- magick::image_blank(200, 200, "white")
  patina_ink_bleed(img)
}
} # }