Re: multigraphics
- To: mathgroup at smc.vnet.net
- Subject: [mg48950] Re: [mg48932] multigraphics
- From: Bob Hanlon <hanlonr at cox.net>
- Date: Fri, 25 Jun 2004 02:58:14 -0400 (EDT)
- Reply-to: hanlonr at cox.net
- Sender: owner-wri-mathgroup at wolfram.com
Plot[Evaluate[
Table[a*x, {a, -4, 4, 2}]],
{x, -2, 5},
Frame -> True, Axes -> False,
PlotStyle -> Table[Hue[(a + 12)/16], {a, -4, 4, 2}],
Epilog -> Table[Text["a=" <> ToString[a],
3.75{1, a}, {Sign[a], -1}], {a, -4, 4, 2}]];
Bob Hanlon
>
> From: Mazuego <mazuego at yahoo.com>
To: mathgroup at smc.vnet.net
> Date: 2004/06/24 Thu AM 05:35:50 EDT
> To: mathgroup at smc.vnet.net
> Subject: [mg48950] [mg48932] multigraphics
>
> I want to plot the function y=ax, for different values of the parameter a,
> in the same graphic! Ho can I do this in Mathematica 5.0? thankyou!
>
>