Re: Several functions in a single 2D-plot

*To*: mathgroup at smc.vnet.net*Subject*: [mg68798] Re: Several functions in a single 2D-plot*From*: Bill Rowe <readnewsciv at earthlink.net>*Date*: Fri, 18 Aug 2006 03:13:01 -0400 (EDT)*Sender*: owner-wri-mathgroup at wolfram.com

On 8/17/06 at 4:18 AM, vginer at gmail.com (Vicent) wrote: >How can I plot several functions within the same 2D graphic? >For example, I want to draw the PDF of 3 continuous statistical >distributions (I mean, 3 functions), but put together into the same >2D plot. There are a number of ways this can be done. Here are two examples: Plot[{PDF[NormalDistribution[0, 1], x], PDF[NormalDistribution[0, 1/2], x], PDF[NormalDistribution[0, 2], x]}, {x, -6, 6}, PlotStyle -> {Red, Blue, Black}, PlotRange -> All, Axes -> None, Frame -> True]; Show[Block[{$DisplayFunction = Identity}, {Plot[PDF[LogNormalDistribution[0, 0.5], x], {x, 0, 5}], Plot[PDF[GammaDistribution[2, 1], x], {x, 0, 5}, PlotStyle -> Blue], Plot[PDF[ExponentialDistribution[1], x], {x, 0, 5},PlotStyle -> Red]}]]; -- To reply via email subtract one hundred and four