Re: Manipulate Series Expansions

*To*: mathgroup at smc.vnet.net*Subject*: [mg112989] Re: Manipulate Series Expansions*From*: "Nasser M. Abbasi" <nma at 12000.org>*Date*: Sun, 10 Oct 2010 06:40:36 -0400 (EDT)*References*: <i8pgeo$fgh$1@smc.vnet.net>*Reply-to*: nma at 12000.org

On 10/9/2010 3:34 AM, Daniel wrote: > I'm new to Mathemtica and have been searching the net for a while > regarding using Manipulate to compare a series expansion to the > original function, but haven't found an adequate solution to my > errors. > > Why doesn't this work: > > Manipulate[ > Plot[{Normal[Series[Sin[x], {x, 0, n}]], Sin[x]}, {x, -10 Pi, > 10 Pi}, PlotRange -> 2], {n, 1, 100, 1}] > > I can do this to make it work as intended: > > p[x_, n_] := Normal[Series[Sin[y], {y, 0, n}]] /. y -> x > Manipulate[ > Plot[{p[x, n], Sin[x]}, {x, -10 Pi, 10 Pi}, PlotRange -> 2], {n, 1, > 100, 1}] > > Any information would be helpful. > > Because the Series commands does not like 'x' to be number. You are using x in the range, and are also using x inside the series command. Try something like for now Manipulate[ Plot[{Normal[Series[Sin[z], {z, 0, n}]] /. z -> x, Sin[x]}, {x, -10 Pi, 10 Pi}, PlotRange -> 2], {n, 1, 100, 1}, {z, ControlType -> None}] --Nasser