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
>
> 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: Plot3D animation problems.
• Next by Date: RE: To create {{},{},....{}} beyond \$MaxRecursionLimit
• Previous by thread: Plot3D animation problems.
• Next by thread: Re: Plot3D animation problems.