lighten plots

*To*: mathgroup at smc.vnet.net*Subject*: [mg5579] lighten plots*From*: Jeff Copes <jcopes at winnie.fit.edu>*Date*: Fri, 27 Dec 1996 01:58:56 -0500*Sender*: owner-wri-mathgroup at wolfram.com

Dear Mathgroupies: The following code creates a matrix of plots representing a vibrating square membrane. The numerical output is great, but I need to lighten up the plots for print. I tried different schemes, but after a few hours, I got nowhere near where I wanted to be. If I changed the ViewPoint option, I could lighten the plot, but not display the plots as needed. Any help would be appreciated. For[k = 0, k < 5, k++ , {Share[], t = k Pi/4, m = Table[ Table[ Sin[2 x] Sin[2 y] Cos[t], {y,0,Pi,Pi/50}] {x,0,Pi,Pi/50}], ListPlot3D[m, PlotRange -> {-1,1}, Boxed -> False, ColorOutput -> GrayLevel, AspectRatio -> 1.5, ViewPoint -> {2.787, 1.067, 1.595}]} ] Yours truly, Jeff Copes