Re: how to plot 2 functions in different colors?

*To*: mathgroup at smc.vnet.net*Subject*: [mg33595] Re: [mg33583] how to plot 2 functions in different colors?*From*: BobHanlon at aol.com*Date*: Wed, 3 Apr 2002 01:13:17 -0500 (EST)*Sender*: owner-wri-mathgroup at wolfram.com

In a message dated 4/2/02 3:47:27 AM, gzhu1 at uiuc.edu writes: >I can plot two functions in one diagram with plot[{fa[x],fb[x]},{x,1,100}], >but they are in same color and hard to seperated. Is there any way to >make >them in different colors? > Use the PlotStyle option Needs["Graphics`Colors`"]; Plot[{Sin[x], Cos[x]}, {x,-3Pi/2,2Pi}, PlotStyle -> {Red, {AbsoluteDashing[{5,5}],Blue}}, Epilog->{ Text["Sin", {Pi, .5}], Text["Cos", {Pi/2, -.5}]}, ImageSize->350]; Needs["Graphics`Legend`"]; Plot[{Sin[x], Cos[x]}, {x,-3Pi/2,2Pi}, PlotStyle -> {Red, {AbsoluteDashing[{5,5}],Blue}}, PlotLegend->{"Sin[x]", "Cos[x]"}, ImageSize->350]; Bob Hanlon Chantilly, VA USA