Re: newby plotting question - problem solved, thanks much!
- To: mathgroup at smc.vnet.net
- Subject: [mg22744] Re: newby plotting question - problem solved, thanks much!
- From: "F. Schwieterman" <fschwiet at u.washington.edu>
- Date: Fri, 24 Mar 2000 03:27:36 -0500 (EST)
- Organization: University of Washington
- References: <8b9orp$9dj@smc.vnet.net>
- Sender: owner-wri-mathgroup at wolfram.com
Okay a couple options were emailed in response, I learned something from
each, but here is the final solution:
<< Graphics`MultipleListPlot`
MultipleListPlot[mean, mean + var, mean - var,
SymbolStyle -> {RGBColor[0., 0., 1.], RGBColor[0., 1., 0.],
RGBColor[1., 0., 0.]}]
It is interesting to note that SymbolStyle, not DefaultColor, is used to
indicate color with MultipleListPlot.
"F. Schwieterman" <fschwiet at u.washington.edu> wrote in message
news:8b9orp$9dj at smc.vnet.net...
> I have three lists I want to plot on the same graph, in different colors.
> My code went as follows:
> (mean and var are lists of numbers, of the same length)
>
> p1 = ListPlot[ mean, PlotRange->All];
> p2 = ListPlot[ mean + Sqrt[var],
> DefaultColor -> RGBColor[0,1,0], PlotRange->All];
> p3 = ListPlot[ mean - Sqrt[var],
> DefaultColor -> RGBColor[1,0,0], PlotRange->All]];
> Show[p1,p2,p3];
>
>
> But this unfortunately draws p1, p2, and p3 on separate plots before
drawing
> all three on a single plot, and they were all black on the last plot
anyhow.
>
> So I was clever, and came up with the following:
>
> Show[
> ListPlot[ mean, PlotRange->All],
> ListPlot[ mean + Sqrt[var],
> DefaultColor -> RGBColor[0,1,0], PlotRange->All],
> ListPlot[ mean - Sqrt[var],
> DefaultColor -> RGBColor[1,0,0], PlotRange->All]]
>
> Which produces the same result. ugh. Any advice?
>
> best karma to the best answers. :)
>
>
>