MathGroup Archive 1997

[Date Index] [Thread Index] [Author Index]

Search the Archive

Re: 3D Plots

  • To: mathgroup at smc.vnet.net
  • Subject: [mg6467] Re: [mg6422] 3D Plots
  • From: el at qua.crl.melco.co.jp (E. Lange)
  • Date: Sun, 23 Mar 1997 13:22:49 -0500 (EST)
  • Sender: owner-wri-mathgroup at wolfram.com

> lpt=Table[{x,y,30Exp[-(x^2-y^2)/.001]},{x,-.0005,.0005,.00005},{
>       y,-.0005,.0005,.00005}];
> ListSurfacePlot[lpt];
> 
> The plot looks wonderful if I replace the 30 with a small number like 
> one or two.  The plot is totally unrecognizeable for a large number like 
> 2000.  Any ideas?

ListSurfacePlot3D[lpt, BoxRatios -> {1, 1, 0.4}]

gets this right. BoxRatios -> {1, 1, 0.4} is the default setting for
Plot3D (see the output of Options[Plot3D]).

I hope this helps        ---        Eberhard Lange


  • Prev by Date: What's better: extra cache or extra RAM?
  • Next by Date: Mathematica 3.0 and scientific workplace
  • Previous by thread: Re: 3D Plots
  • Next by thread: Problem with collect