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