Re: Plot DiracDelta[]
- To: mathgroup at smc.vnet.net
- Subject: [mg28479] Re: [mg28465] Plot DiracDelta[]
- From: BobHanlon at aol.com
- Date: Sun, 22 Apr 2001 01:30:12 -0400 (EDT)
- Sender: owner-wri-mathgroup at wolfram.com
When you decide how long the Line should be, draw the Line(s) in a Prolog or
Epilog.
sa[x_ /; x == 0] = 1;
sa[x_] := Sin[x]/x;
Plot[sa[x]^2, {x, 0, 2Pi},
PlotStyle -> {RGBColor[0, 0, 1], AbsoluteDashing[{5, 5}]},
Prolog -> {RGBColor[1, 0, 0],
Table[Line[{{x, 0}, {x, sa[x]^2}}], {x, 0, 2Pi, Pi/10}]}];
Bob Hanlon
In a message dated 2001/4/20 4:45:20 AM, ulbrich at biochem.mpg.de writes:
>does anybody know if there is a possibility
>to include the DiracDelta[] in a Plot?
>If I have
>
>Plot[DiracDelta[x-1],{x,0,2}]
>
>I see nothing, but I would like to see
>a vertical line at x=1.