Home › Blogs › jpmay's blog

Colouring Easter Eggs with Plots

jpmay's picture
Posted on 2008-03-08 14:38 By jpmay (Maple Rating 2 114)
Categories:

I spotted this today whist wandering the blogosphere: Who Among You are Geek Enough to Decorate Your Easter Eggs in Mathematica? (via BoingBoing). Clearly there is a challenge here.

I am not a master of the plot command, but I would like to see what others can come up with. 

Here's a simple egg to start people off:

plots:-implicitplot3d((1/4)*x^2*(1+.1*z)+(1/4)*y^2*(1+.1*z)+z^2/2.75^2 = 1, x = -3 .. 3, y = -3 .. 3, z = -3 .. 3, grid = [20, 20, 20], style = patchnogrid, shading = zhue);

Comments

Your egg

Comment on 2008-03-14 14:01 from Kathryn Cramer (1)

Very nice. I'll print it out for my daughter's collection.

A Bit Late for Easter

Comment on 2008-05-28 13:41 from pchin (Maple Rating 2 140)

I can't believe I missed this post in March. Well, it's rather late for Easter eggs, but  "better late than never," as they say.

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.

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)

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 := plots[conformal3d](cos(z), z = 0 .. 2*Pi+I*Pi, color = ["DeepPink", "Blue"], spherecolor = "LimeGreen", grid = [30, 30]);
f := plottools[transform](proc (x, y, z) options operator, arrow; [.8*(sqrt(z)+1)*x, .8*(sqrt(z)+1)*y, 2*z] end proc);
plots[display](f(p), scaling = constrained, orientation = [30, -90])

Paulina Chin
Maplesoft

Comment viewing options

Select your preferred way to display the comments and click "Save settings" to activate your changes.
}