Re: N00b help needed: Graphics
- To: mathgroup at smc.vnet.net
 - Subject: [mg96856] Re: N00b help needed: Graphics
 - From: "Sjoerd C. de Vries" <sjoerd.c.devries at gmail.com>
 - Date: Thu, 26 Feb 2009 07:55:45 -0500 (EST)
 - References: <go319k$f2n$1@smc.vnet.net>
 
Hi Hauke,
Last time I checked, the version 5 Plot and ListPlot were working just
fine. (BTW unbelievable Hamburg University doesn't have 6 or 7, that
can't really be true).
The following works on my version 5.2:
f = Table[{x, Random[Real, {0.98, 1.02}] Sin[x]}, {x, 0, 2 =CF=80, =CF=80=
/20.}]
g = Table[{x, Random[Real, {0.9, 1.1}] Sin[x]}, {x, 0, 2 =CF=80, =CF=80/2=
0.}];
p1 = Plot[Interpolation[f][
        x], {x, Min[f\[Transpose][[1]]], Max[f\[Transpose][[1]]]}]
p2 = ListPlot[g]
Show[p1, p2]
If f is so smooth as you claim, you might consider dropping
Interpolation:
p1 = ListPlot[f, PlotJoined -> True]
Cheers -- Sjoerd
On Feb 25, 10:59=C2 am, Hauke Reddmann <fc3a... at uni-hamburg.de> wrote:
> Hello,
>
> I have a very simple problem: Visualization of
> two data sets f={{x1,y1},{x2,y2},...} and
> g={{X1,Y1},{X2,Y2},...}.
> The first set shall be replaced by an interpolated curve:
> F=Interpolation[f]. OK, that was trivial :-)
> The second shall be shown as small dots overlayed on the graph
> of f. Where is the problem, you ask? The problem is
> my uni has version 5 and all the Graphics primitives
> as shown on the Wolfram Internet site give no visible
> output or even error messages!
> Surely you have a command Plot[something_with_f_and_g]
> for me working for any data lists? (Spline madness is
> no issue, F is very smooth with my actual test data set f.)
>
> THX,
> --
> Hauke Reddmann <:-EX8 =C2  =C2 fc3a... at uni-hamburg.de
> Nur Schufte schuften - Genie genie=C3=9Ft.