http://www.mapleprimes.com/posts/39834-Colouring-Easter-Eggs-With-Plots en-us 2026 Maplesoft, A Division of Waterloo Maple Inc. Maplesoft Document System Wed, 10 Jun 2026 19:01:00 GMT Wed, 10 Jun 2026 19:01:00 GMT The latest comments added to the Post, Colouring Easter Eggs with Plots http://www.mapleprimes.com/images/mapleprimeswhite.jpg http://www.mapleprimes.com/posts/39834-Colouring-Easter-Eggs-With-Plots http://www.mapleprimes.com/posts/39834-Colouring-Easter-Eggs-With-Plots?ref=Feed:MaplePrimes:Colouring Easter Eggs with Plots:Comments#comment72850 Very nice. I'll print it out for my daughter's collection. The latest comments added to the Post, Colouring Easter Eggs with Plots 72850 Fri, 14 Mar 2008 22:01:51 Z Kathryn Cramer Kathryn Cramer http://www.mapleprimes.com/posts/39834-Colouring-Easter-Eggs-With-Plots?ref=Feed:MaplePrimes:Colouring Easter Eggs with Plots:Comments#comment71417 <p>I can't believe I missed this post in March. Well, it's rather late for Easter eggs, but&nbsp; &quot;better late than never,&quot; as they say.</p> <p>John's plots[implicitplot3d] egg is very nice, but with the plot3d command, you can use colour functions. I also used the lightmodel and glossiness options to make my egg extra shiny.</p> <p>plot3d([(sqrt(w)+.2)*cos(v)*sin(w), (sqrt(w)+.2)*sin(v)*sin(w), 1.7*cos(w)], v = 0 .. 2*Pi, w = 0 .. Pi, grid = [50, 50], scaling = constrained, color = cos(w+v), style = surface, orientation = [30, 120], lightmodel = light4, glossiness = 1)</p> <p><img alt="" src="http://www.mapleprimes.com/scripts/image.php?image=http://www.mapleprimes.com/files/86_Plot3dEgg.jpg&amp;width=300&amp;height=300" /></p> <p>For my second egg, I used the plots[conformal3d] routine and altered the sphere with plottools[transform] to make the following (conformal plot on a Riemann egg?):</p> <p>p := plots[conformal3d](cos(z), z = 0 .. 2*Pi+I*Pi, color = [&quot;DeepPink&quot;, &quot;Blue&quot;], spherecolor = &quot;LimeGreen&quot;, grid = [30, 30]);<br /> f := plottools[transform](proc (x, y, z) options operator, arrow; [.8*(sqrt(z)+1)*x, .8*(sqrt(z)+1)*y, 2*z] end proc);<br /> plots[display](f(p), scaling = constrained, orientation = [30, -90])</p> <p><img alt="" src="http://www.mapleprimes.com/scripts/image.php?image=http://www.mapleprimes.com/files/86_ConformalPlotEgg.jpg&amp;width=300&amp;height=300" /></p> <p>Paulina Chin<br /> Maplesoft</p> The latest comments added to the Post, Colouring Easter Eggs with Plots 71417 Wed, 28 May 2008 21:41:09 Z pchin pchin