Re: combining two plots
- To: mathgroup at smc.vnet.net
- Subject: [mg16784] Re: [mg16708] combining two plots
- From: davidez at zetadi.com
- Date: Wed, 24 Mar 1999 17:07:11 -0500
- Sender: owner-wri-mathgroup at wolfram.com
You must use the Show function:
rettatang[x_,x0_]:==f[x0]+f'[x0](x-x0)
grafico[x0_]:==Plot [{f[x],rettatang[x,x0]},{x,0,2Pi},
PlotRange ->{{0,2Pi},{-2,2}},
PlotStyle->{RGBColor[1,0,0],RGBColor[0,0,1]}];
listapunti[i_] :== ListPlot[Table[{x,f'[x]},{x, 0, i, 0.2}],
PlotRange ->{{0,2Pi},{-2,2}}]
Show[grafico[1], listapunti[1]]
Bye,
Davide
---------------------------------------------------------------------------=
-
Web site: http://members.xoom.it/davidezordan
E-mail: davidez at zetadi.com
---------------------------------------------------------------------------=
-
-----Messaggio originale-----
Da: Joaquim Leitao <quim at ideiafix.fis.ua.pt>
A: mathgroup at smc.vnet.net <mathgroup at smc.vnet.net>
Data: mercoled=EC 24 marzo 1999 14.19
Oggetto: [mg16708] combining two plots
>Hello:
>
>I'd like to draw in the same plot a function and some discrete
>points. How can I combine the ListPlot and Plot comands in the same
>figure?
>
>Any help will be appreciated
>Joaquim Pratas Leitao
>Departamento de Fisica
>Universidade de Aveiro
>3810 Aveiro, Portugal
>tel: +351 34 370286
>e-mail: quim at fis.ua.pt
>