Re: Several functions in a single 2D-plot

*To*: mathgroup at smc.vnet.net*Subject*: [mg68746] Re: Several functions in a single 2D-plot*From*: dimmechan at yahoo.com*Date*: Fri, 18 Aug 2006 03:11:46 -0400 (EDT)*References*: <ec19f0$oir$1@smc.vnet.net>*Sender*: owner-wri-mathgroup at wolfram.com

?Plot Plot[f, {x, xmin, xmax}] generates a plot of f as a function of x from xmin \ to xmax. Plot[{f1, f2, ... }, {x, xmin, xmax}] plots several functions fi. More... For example, Plot[ {BesselJ[0,x],BesselJ[1,x], BesselJ[2,x] }, {x,0,10},PlotStyle\[Rule]{Thickness[0.008],Thickness[0.\ 006],Thickness[0.004]}]; or g={BesselJ[0,x],BesselJ[1,x],BesselJ[2,x]}; Plot[Evaluate[g], {x, 0, 10}, PlotStyle -> { Thickness[0.008], Thickness[0.006], Thickness[0.004]}]; Of course, after you can change the default options and add legends to make the plot look better. For example, Plot[ {BesselJ[0, x], BesselJ[1, x], BesselJ[2, x] }, {x, 0, 10}, PlotStyle -> {AbsoluteThickness[1], AbsoluteThickness[ 2], AbsoluteThickness[3]}, TextStyle -> {FontFamily -> "Times", \ FontSize -> 20}, AxesLabel -> {"x", TraditionalForm[BesselJ[n, x]]}, PlotLegend -> {"n=0", "n=1", "n=2"}, LegendShadow -> None, LegendPosition -> {0, 0}, ImageSize -> {500, 300}]; Cheers, Jim Î?/Î? Vicent ÎÎ³Ï?Î±Ï?Îµ: > Hi, everyone! > > I am new to Mathematica, and I have a quick question that will be very > easy for you, I guess. > > 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. > > Thank you in advance! > > -- > Vicent