# \donttest{
img <- system.file("extdata/corbetti.png", package = "recolorize")
rc <- recolorize2(img, cutoff = 45)
# save a PNG:
recolorize_to_png(rc, "corbetti_recolored.png")
# remove the PNG (so this example doesn't spam your working directory)
file.remove("corbetti_recolored.png")
# }
Run the code above in your browser using DataLab