Re: Plot problem
- To: mathgroup at smc.vnet.net
- Subject: [mg37205] Re: Plot problem
- From: "Borut L" <gollum at email.si>
- Date: Wed, 16 Oct 2002 14:26:36 -0400 (EDT)
- References: <akkbts$7o2$1@smc.vnet.net> <aogj94$1p7$1@smc.vnet.net>
- Sender: owner-wri-mathgroup at wolfram.com
Try something less clumsy, eg :
Plot[#1,{#2,-5,5}]&@@@Transpose[{FuncList,VarList}]
or why not have a particular symbol for the independent variable - then just
map the plot command over the FuncList :
Plot[#,{t,-5,5}]&/@{Exp[t],Sin[t],t^3}
bye,
Borut
"Frank Brand" <frank.brand at t-online.de> wrote in message
news:aogj94$1p7$1 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
|
|
|