Re: Function Show[]
- To: mathgroup at smc.vnet.net
- Subject: [mg53380] Re: Function Show[]
- From: Bill Rowe <readnewsciv at earthlink.net>
- Date: Sat, 8 Jan 2005 23:02:41 -0500 (EST)
- Sender: owner-wri-mathgroup at wolfram.com
On 1/8/05 at 2:39 AM, mo.wichert at tiscalinet.ch (Moreno Wichert)
wrote:
>I've just plotted some atomic orbitals from the hydrogen atom. Now,
>for the p-orbital I have a positive and a negative function and I
>combine this functions for a plot using the command Show[]. So my
>problem is, that I want different colors for the negative and the
>positive function but when I use Show[], Mathematica plots only one
>color for both functions. How can I define different colors in the
>command Show[]?
Simply set the color of each in the individual plots then let Show combine them. For example the following plots a series of points in black with a line in red
Show[
Block[
{$DisplayFunction = Identity},
{ListPlot[Table[n + Random[] - 0.5, n, 10}]],
Plot[x, {x, 0, 10}, PlotStyle -> Hue[0]]}]];
--
To reply via email subtract one hundred and four