Re: How to combine graphics pimitives and Plot function?
- To: mathgroup at smc.vnet.net
- Subject: [mg107032] Re: [mg107011] How to combine graphics pimitives and Plot function?
- From: Patrick Scheibe <pscheibe at trm.uni-leipzig.de>
- Date: Mon, 1 Feb 2010 06:11:07 -0500 (EST)
- References: <201001311253.HAA14187@smc.vnet.net>
Hi,
use Show
points = RandomReal[{-1, 1}, {100, 2}];
Show[{
Graphics[{Red, Line[points]}, Axes -> True],
Plot[Sin[Pi x], {x, -1, 1}, PlotStyle -> {Thick}]}]
Cheers
Patrick
On Sun, 2010-01-31 at 07:53 -0500, a boy wrote:
> points = RandomReal[{-1, 1}, {100, 2}]
> Graphics[{Red, Line[points], Plot[Sin[x], {x, -10 Pi, 10 Pi}]},
> Axes -> True]
>
> The code doesn't work. how to draw them together? ImageCompose ?
>
>