Re: Linien in Diagramm einfügen

[Jens-Peer Kuska <kuska@XXXXXXX.de>]

Hallo,

die Return-Taste ist gaanz weit rechts in der Mitte des
Buchstaben-Blocks !
               |
Manchmal ist <-+  oder sogar Return drauf geschrieben.

Vielleicht hilft

Plot[Sin[x], {x, 0, 2Pi}, Epilog ->
    {Line[{{Pi/2, 0}, {Pi/2, 1}}], Line[{{3Pi/2, 0}, {3Pi/2, -1}}]}]


Nat"urlich geht auch

SetAttributes[PlotWithLines, HoldAll]

PlotWithLines[func_, range_, xlines_List, opts___] :=
  Module[{ll},
    ll = Line[{{#, 0}, {#, (func /. First[range] -> #)}}] & /@ xlines;
    Plot[func, range, opts, Epilog -> ll]
    ]

und

PlotWithLines[Sin[x], {x, 0, 2Pi}, {Pi/2, 3Pi/2}]


Gruss
  Jens

oliver.tonn@XXXXXXX.de wrote:
> 
> Hallo,
> 
> ich möchte gerne in ein Diagramm (z.B. Sin[x]) an bestimmten Punkten senkrechte Linien einfügen, die vom Nullpunkt 
> bis zum an dieser Stelle herschenden Wert der Formel gehen.
> Wer weiß Rat?
> 
> Gruß Oliver
> ______________________________________________________________________________
> Sichern Sie sich Ihre Chancen auf den Jackpot: Mit dem WEB.DE
> Lottoservice bequem und sicher tippen: http://tippen2.web.de/?x=11