Re: How come doesn't this work?
- To: mathgroup at smc.vnet.net
- Subject: [mg75694] Re: [mg75659] How come doesn't this work?
- From: Bob Hanlon <hanlonr at cox.net>
- Date: Wed, 9 May 2007 04:16:31 -0400 (EDT)
- Reply-to: hanlonr at cox.net
Taylor[n_]:= Normal[Series[ArcTan[x],{x,0,n}]]; F=ArcTan[x]; Use SetDelayed when defining Grafico Grafico[n_]:=Plot[{F,Taylor[n]}//Evaluate, {x,-Pi,Pi},PlotStyle->{Blue,Red}]; Grafico[3] Bob Hanlon ---- Anolethron <abacus78685 at tin.it> wrote: > I know I have to put Evaluate In but it doesn't work still. > Taylor[n_] := Normal[Series[ArcTan[x], {x, 0, n}]] > > F = ArcTan[x] > Grafico[n_] = > Plot[{F, Taylor[n]} // Evaluate, {x, -Pi, Pi}, > DisplayFunction -> $DisplayFunction] > > >