Show[] applied to a Plot[] and a ListPlot[] ??
- To: mathgroup at smc.vnet.net
- Subject: [mg41023] Show[] applied to a Plot[] and a ListPlot[] ??
- From: "1.156" <rob at piovere.com>
- Date: Tue, 29 Apr 2003 05:24:18 -0400 (EDT)
- Sender: owner-wri-mathgroup at wolfram.com
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 mma Show[] reveal the nice big red dots
from a ListPlot in b while also displaying the Plot[] curve?
Rob
- Follow-Ups:
- Re: Show[] applied to a Plot[] and a ListPlot[] ??
- From: Tomas Garza <tgarza01@prodigy.net.mx>
- Re: Show[] applied to a Plot[] and a ListPlot[] ??