Re: Plot a function on Time Scales
- To: mathgroup at smc.vnet.net
- Subject: [mg63587] Re: [mg63568] Plot a function on Time Scales
- From: gardyloo <gardyloo at mail.wsu.edu>
- Date: Fri, 6 Jan 2006 05:24:30 -0500 (EST)
- References: <200601051102.GAA24336@smc.vnet.net>
- Sender: owner-wri-mathgroup at wolfram.com
Hi, Unal,
If I understand your notation correctly, you essentially want two
continuous plots, and one discrete-point plot. Here's how I did it (note
that plot1 is so small on the vertical axis that it's essentially
invisible. I've colored it red to make sure it's really there):
Needs["Graphics`Graphics`"] (* this is for the DisplayTogether function *)
plot1 = Plot[x^2, {x, -1, 1}, PlotStyle -> Hue[0]];
plot2 = ListPlot[({#1, #1^2} & ) /@ {2, 3, 5, 8}];
plot3 = Plot[x^2, {x, 12, 20}];
DisplayTogether[plot1, plot2, plot3];
Good luck!
Curtis O.
Unal Ufuktepe wrote:
>Let f(x)=x^2 and I want to draw the graph of f on
>T=[-1,1]U{2,5,8,11}U[12,20]
>How can I plot this function on T with
>Mathematica without spliting the graph?
>Any idea? (I tried the PiecewisePlot but did not work with 5.2)
>Thanks
>nal
>Ufuktepe,PhD
>Izmir Institute of Technology
>Department of Mathematics,
>Gülbahce-Urla, Izmir 35435
>Phone:(232)-7507614
>
>
>
>
- References:
- Plot a function on Time Scales
- From: "Unal Ufuktepe" <unalufuktepe@iyte.edu.tr>
- Plot a function on Time Scales