RE: Plot problem

*To*: mathgroup at smc.vnet.net*Subject*: [mg37191] RE: [mg37179] Plot problem*From*: "David Park" <djmp at earthlink.net>*Date*: Wed, 16 Oct 2002 14:25:18 -0400 (EDT)*Sender*: owner-wri-mathgroup at wolfram.com

Frank, The first method is just to Evaluate the iterator. FuncList = {Exp[x], Sin[y], z^3}; VarList = {x, y, z}; Do[Plot[FuncList[[i]], Evaluate[{VarList[[i]], -5, 5}]], {i, 1, Length[VarList]}] But a simpler method is to use functional programming... MapThread[Plot[#1, {#2, -5, 5}] &, {FuncList, VarList}]; David Park djmp at earthlink.net http://home.earthlink.net/~djmp/ From: Frank Brand [mailto:frank.brand at t-online.de] To: mathgroup at smc.vnet.net Dear colleagues, how can I solve the following problem: The task is to successively plot the functions given in FuncList with the accociated variable FuncList = {Exp[x], Sin[y], z^3}; VarList = {x, y, z}; Do[Plot[FuncList\[LeftDoubleBracket] i\[RightDoubleBracket], {VarList\[LeftDoubleBracket] i\[RightDoubleBracket], -5, 5}], {i, 1, Length[VarList]}]] Thanks in advance Frank Brand