MathGroup Archive 2000

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

Search the Archive

Re: Q: Plot3D bug?

  • To: mathgroup at smc.vnet.net
  • Subject: [mg22777] Re: Q: Plot3D bug?
  • From: Harald Giese <giese at ifm.uni-hamburg.de>
  • Date: Sat, 25 Mar 2000 03:58:15 -0500 (EST)
  • Organization: Institut fuer Meereskunde, Universitaet Hamburg
  • References: <8bf9ve$hng@smc.vnet.net>
  • Sender: owner-wri-mathgroup at wolfram.com

Christoph Handel wrote:
> 
> i have to make a 3D-plot.
> 
> The function evaluatetd will take about 15 sec for one Plotpoint.
> Setting ab the 3D Plot
> 
> Plot3D[f[x,y],{x,0,10},{y,0,10}, PlotPoints->{2,2}]
> 
> will take about 5 minutes and then it filled up my memory (128MB +
> 128MB Swap) and still has no result.
> 
> System: NT4SP5 Mathematica 3.01
> 
> Any Hints?
> 

Christoph,

With f[x_, y_] := Sin[x y] your Plot3D works quite fast (0.36 sec) on my
Pent 200MHz (128MB RAM) with Mathematica 4.0 and NT4.0SP6a. Perhaps its your
f[x,y] that makes the problem?!

Check the memory your function needs for evaluation (MemoryInUse,
MaxMemoryUsed). 
Use Compile to get a compiled version of your function to enter Plot3D
with.
Plot, Plot3D, ... will compile the function to plot by default (Plot
option Compiled->True), but it might be that this compilation eats up
your PC's resources.

Regards,
/Harald


-- 

Harald Giese
Email: giese at dkrz.de
Phone: +49 (0)40 42838 5796; Fax: +49 (0)40 5605724
Institut fuer Meereskunde der Universitaet Hamburg
(Institute of Oceanography of the University of Hamburg)
Troplowitzstrasse 7, D-22529 Hamburg


  • Prev by Date: Re: newby plotting question
  • Next by Date: Re: how to find roots of Bessel zero's
  • Previous by thread: Q: Plot3D bug?
  • Next by thread: Re: Q: Plot3D bug?