Function Repository Resource:

ImageInkOverWatercolor

Source Notebook

Give an image the appearance that it has been painted in watercolor and then outlined in black ink

Contributed by: Mark Greenberg

ResourceFunction["ImageInkOverWatercolor"][img]

makes the image img appear to be painted with watercolors with inked outlines.

Details

ResourceFunction["ImageInkOverWatercolor"][img] produces three layers and then composes them:
wash layerbackground is lightened and blurred horizontally to simulate a watercolor wash
foreground layerforeground is blurred slightly to simulate more detailed watercolor painting
ink layeredges are drawn in black to simulate an ink pen contour tracing
The effect is more predictable when the image has a focal object that contrasts in value from the background.
ResourceFunction["ImageInkOverWatercolor"][img] may produce interesting results when the background values are similar to the focal object.

Examples

Basic Examples (1) 

Make an image appear to be painted in watercolor with inked outlines:

In[1]:=
(* Evaluate this cell to get the example input *) CloudGet["https://www.wolframcloud.com/obj/d07a8dab-cea8-4a1b-a73e-b4b858af94ee"]
Out[1]=

Scope (1) 

Here the car's tire and grill become part of the background watercolor wash because they have coloring similar to the background:

In[2]:=
(* Evaluate this cell to get the example input *) CloudGet["https://www.wolframcloud.com/obj/420dc174-0f10-4b43-9404-59ae9dffe15b"]
Out[2]=

Possible Issues (1) 

The larger the image, the more intricate the ink outlines will be, but larger images take longer to render:

In[3]:=
(* Evaluate this cell to get the example input *) CloudGet["https://www.wolframcloud.com/obj/9bf88c30-1678-44f3-bc6e-efd776b45bb7"]
Out[3]=

Publisher

Mark Greenberg

Version History

  • 1.0.0 – 29 June 2021

Related Resources

License Information