nestled plotting

*To*: mathgroup at smc.vnet.net*Subject*: [mg72353] nestled plotting*From*: junk at apspektakel.com*Date*: Tue, 26 Dec 2006 07:47:07 -0500 (EST)

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