Re: Show[] applied to a Plot[] and a ListPlot[] ??
- To: mathgroup at smc.vnet.net
- Subject: [mg41044] Re: [mg41023] Show[] applied to a Plot[] and a ListPlot[] ??
- From: Tomas Garza <tgarza01 at prodigy.net.mx>
- Date: Wed, 30 Apr 2003 04:21:21 -0400 (EDT)
- References: <200304290924.FAA09471@smc.vnet.net>
- Sender: owner-wri-mathgroup at wolfram.com
I'm afraid the answer is dreadfully simple. Just try Show[b,a]. BTW, the
curly brackets are not needed. All this has to do with the way Graphics
keeps the options in the various objects to be shown together.
Tomas Garza
Mexico City
----- Original Message -----
From: "1.156" <rob at piovere.com>
To: mathgroup at smc.vnet.net
Subject: [mg41044] [mg41023] Show[] applied to a Plot[] and a ListPlot[] ??
> First I start with a few measured data points:
>
> data = {{0,260.}, {.25,218.},{.5,200.}, {.75,212.}, {1.,240.}};
>
> (* I do some curve fitting/regression and I come up with a polynomial and
I'd like to see how the curve compares with the data *)
>
> a0 = 260.; a1 = -188.; a2 = -2.667; a3 = 384.; a4 = -213.333.;
>
> f[x_]= a0+ a1 x+ a2 x^2+ a3 x^3 +a4 x^4;
>
> (* So I plot each of them, both look good to me. a plots the best fit
curve and b plots the data points with nice big red dots. I got the b code
from some kind soul on this ng I think. Both plots are over a domain from 0
to 1 *)
>
> a = Plot[f[x], {x, 0, 1}];
>
b=ListPlot[data,Epilog\[Rule]{RGBColor[1,0,0],PointSize[0.025],Point/@data}]
>
> (* now that I see that both plots work, I do my usual and Show them
together *)
>
> Show[{a,b}]
>
> But woe is me: I can see some of the b points as small black dots (not
RED!), and several I can't see at all next to the plain black plot of a.
This seems to work fine if both a and b are standard Plot[] functions but
here I'm mixing Plot[] and ListPlot[]
> -- I'm definitely teasing the devil.
>
> Can someone give me a hint how to make Mathematica Show[] reveal the nice big red
dots
> from a ListPlot in b while also displaying the Plot[] curve?
>
> Rob
>
>
- References:
- Show[] applied to a Plot[] and a ListPlot[] ??
- From: "1.156" <rob@piovere.com>
- Show[] applied to a Plot[] and a ListPlot[] ??