Old educational film preset — patina_edu

Adds a warm/green cast, heavy grain, dust, scratches, and slight weave for a classroom 16mm look.

Usage

patina_edu_film(
  img,
  warmth = 0.35,
  grain = 0.45,
  vignette = 0.22,
  jitter = 0.4,
  dust = 0.25,
  dust_n = NULL,
  dust_size_px = c(0.6, 2.2),
  dust_polarity = c("white", "black", "mixed"),
  dust_mix = 0.5,
  seed = NULL,
  scratches = 6L
)

Arguments

img: magick image
warmth: 0..1 warm/green cast (0=none)
grain: 0..1 coarse film grain
vignette: 0..1 edge darkening
jitter: small rotation in degrees to mimic gate weave
dust: 0..1 dust amount scaler (0 = none)
dust_n: integer, override number of dust specks (NULL = auto by size × dust)
dust_size_px: length-2 numeric, min/max speck radius in pixels
dust_polarity: one of "white","black","mixed"
dust_mix: 0..1 fraction of black specks when dust_polarity="mixed"
seed: optional integer to make dust/scratches reproducible
scratches: integer number of vertical scratches to draw (0 = none)

Examples

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