Re: Plot a function on Time Scales
- To: mathgroup at smc.vnet.net
- Subject: [mg63596] Re: Plot a function on Time Scales
- From: "Valeri Astanoff" <astanoff at yahoo.fr>
- Date: Fri, 6 Jan 2006 05:24:46 -0500 (EST)
- References: <dpiupr$ntk$1@smc.vnet.net>
- Sender: owner-wri-mathgroup at wolfram.com
Merhaba,
Assuming you intend to plot a kind of barchart
for x={2,5,8,11}, I suggest you define f this way :
f[x_] =
With[{k = 0.1},
Piecewise[{{x^2, -1 < x < 1},
Sequence @@ Table[{u^2,u-k<x<u+k},{u,2,11,3}],
{x^2, 12 < x < 20}}]]
then you can use Plot[f[x],{x,...}]
hth
v.a.