Use simulated lighting for the background density

Example 2 steps, run in order in one session. Every step was executed against the engine and the output below is what it produced.

Step 1

rot[x_, y_] = Curl[{Cos[x + y ^ 3], Sin[y + x ^ 3]}, {x, y}];

No output - this step sets something up for the next one.

Step 2

StreamDensityPlot[{{Cos[x + y ^ 3], Sin[y + x ^ 3]}, Log[Abs[rot[x, y]] + 1]}, {x, -2, 2}, {y, -2, 2}, StreamPoints -> Fine, ColorFunction -> "RedBlueTones", MaxRecursion -> 4, LightingAngle -> Automatic, StreamStyle -> Black, StreamColorFunction -> None]

Output

-Graphics-

Run this on Qurak All recipes

Functions used

Abs Cos Curl Log Sin StreamDensityPlot

Related recipes

All recipes · Function reference · Use this from an MCP client