Example 7.12 - Plotting in cylindrical coordinates
Let us plot a very simple function r=sin(u/v) using
cylindrical coordinates. Here u=-PI..PI and v=0.1..1.5. For this purpose, we will use the same color function as we did in the previous example.
Observe, that for the purpose of the web presentation I
used very small Grid value. However, the best result we
are getting for Grid=40 or even 50.
export(plot, cylindrical):
h:=(x,y,z)->[abs(sin(x)),abs(sin(y)),abs(sin(z))]:
sculpture := cylindrical(
[sin(u/v), u, v], u = -PI..PI, v = 0.1..1.5,
Grid = [30, 30],
Style = [ColorPatches, AndMesh],
Color = [Function,h]
):