MathGroup Archive 2004

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

Search the Archive

Re: Plot3D animation problems.


Hi,

a) your posting doen not include the definition of the 
   Sincphase[x_,t_] function
b) you have to separate the expression and the iterator in Table[]     
   by a comma Table[Plot3D[___],{time,1,1}]

Regards
  Jens

lindseyp wrote:
> 
> 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?


  • Prev by Date: Re: To create {{},{},....{}} beyond $MaxRecursionLimit
  • Next by Date: Re: Plot3D animation problems.
  • Previous by thread: Re: Plot3D animation problems.
  • Next by thread: Symbolic matrix manipulation