newby plotting question
- To: mathgroup at smc.vnet.net
 - Subject: [mg22711] newby plotting question
 - From: "F. Schwieterman" <fschwiet at u.washington.edu>
 - Date: Wed, 22 Mar 2000 00:28:15 -0500 (EST)
 - Organization: University of Washington
 - Sender: owner-wri-mathgroup at wolfram.com
 
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. :)