Re: nestled plotting

*To*: mathgroup at smc.vnet.net*Subject*: [mg72361] Re: nestled plotting*From*: Jean-Marc Gulliet <jeanmarc.gulliet at gmail.com>*Date*: Tue, 26 Dec 2006 08:19:15 -0500 (EST)*Organization*: The Open University, Milton Keynes, UK*References*: <emdors$jvh$1@smc.vnet.net>

junk at apspektakel.com wrote: > Hi > I'm having this problem. I want to plot a number of maclaurin > polynomials and I want to do it like this: > Plot[Table[Normal[Series[Sin[x], {x, 0, i}]], {i, 5}], {x, -15, 15}] > This gives me a bunch of error messages. However, if I first print the > table: > Table[Normal[Series[Sin[x], {x, 0, i}]], {i, 5}] > and cut and pase this into the plot command, everything works just as I > want it. How do I get past the cut and paste step? > > /Hadoque > Wrap the Table expression within an Evaluate [1] function as in Plot[Evaluate[Table[Normal[Series[Sin[x], {x, 0, i}]], {i, 5}]], {x, -15, 15}]; Regards, Jean-Marc 1. http://documents.wolfram.com/mathematica/functions/Evaluate