MathGroup Archive 2005

[Date Index] [Thread Index] [Author Index]

Search the Archive

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


  • Prev by Date: Re: Export Animation
  • Next by Date: Re: Export Animation
  • Previous by thread: Re: easy question about random numbers
  • Next by thread: Re: Function Show[]