RE: nestled plotting

*To*: mathgroup at smc.vnet.net*Subject*: [mg72434] RE: [mg72353] nestled plotting*From*: "David Park" <djmp at earthlink.net>*Date*: Wed, 27 Dec 2006 06:35:25 -0500 (EST)

Use Evaluate. Plot[Table[Normal[Series[Sin[x], {x, 0, i}]], {i, 5}] // Evaluate, {x, -15, 15}] But generally it is better to do extensive 'data processing' outside of a plot statement and make certain it is what you want, rather than cram it all into a plot statement. David Park djmp at earthlink.net http://home.earthlink.net/~djmp/ From: junk at apspektakel.com [mailto:junk at apspektakel.com] 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