Re: Plot3D animation problems.

*To*: mathgroup at smc.vnet.net*Subject*: [mg46738] Re: [mg46718] Plot3D animation problems.*From*: Tomas Garza <tgarza01 at prodigy.net.mx>*Date*: Thu, 4 Mar 2004 00:47:40 -0500 (EST)*References*: <200403030010.TAA18808@smc.vnet.net>*Sender*: owner-wri-mathgroup at wolfram.com

My first impression is that Mathematica doesn't know what Sincphase is supposed to be (neither do I). Hence it cannot be plotted 3D. Tomas Garza Mexico City ----- Original Message ----- From: "lindseyp" <lindseyp at nospamremovethis.gol.com> To: mathgroup at smc.vnet.net Subject: [mg46738] [mg46718] Plot3D animation problems. > Hi. I'm trying to make a small animation of a 3D Sinc function with a phase > element added: > > Sinc[0] := 1; > Sinc[0.] := 1; > Sinc[x_] := Sin[x]/x; > sincmovie = Table[ > Plot3D[ > Sincphase[(x x+y y)^(1/2),time] , {x,-20,20}, {y,-20,20} > , PlotPoints->80, PlotRange->{-0.5, 1}, Mesh->False] > {time, 1, 1}]; > > A single frame using a fixed value for 'time' plots fine, but when I try to > plot the whole table I get: > > Plot3D::plnc: Sincphase[(*)Sqrt(xx+yy), time] is \ > neither a machine-size real number at x, y={20,20} > \) nor a list of a real number and a valid color directive."\) > > ((*)Sqrt substituted for symbol) . as if the 'time' variable is not being > evaulated. Am I doing something wrong? > > >

**References**:**Plot3D animation problems.***From:*"lindseyp" <lindseyp@nospamremovethis.gol.com>