Re: Plot problem

• To: mathgroup at smc.vnet.net
• Subject: [mg37183] Re: Plot problem
• From: Jens-Peer Kuska <kuska at informatik.uni-leipzig.de>
• Date: Wed, 16 Oct 2002 14:25:01 -0400 (EDT)
• Organization: Universitaet Leipzig
• References: <akkbts\$7o2\$1@smc.vnet.net> <aogj94\$1p7\$1@smc.vnet.net>
• Reply-to: kuska at informatik.uni-leipzig.de
• Sender: owner-wri-mathgroup at wolfram.com

```Hi,

FuncList = {Exp[x], Sin[y], z^3};

VarList = {x, y, z};

Plot[Evaluate[#[[1]], {#[[2]], -5, 5}]] & /@ Transpose[{FuncList,
VarList}]

Regards
Jens

Frank Brand wrote:
>
> 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

```

• Prev by Date: Re: Plot problem
• Next by Date: c++ book
• Previous by thread: Re: Plot problem
• Next by thread: RE: Plot problem