|
> -----Original Message----- > From: oliver.tonn@XXXXXXX.de [mailto:oliver.tonn@XXXXXXX.de] > Sent: Wednesday, February 06, 2002 5:08 PM > To: dmug@XXXXXXX.ch > Subject: Linien in Diagramm einfügen > > > 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? > Oliver, wenn du mit "Nullpunkt" die Ordinate meinst, dann hier ein Beispiel: In[11]:= Solve[Sin[x] == y, x] /. Partition[Thread[y -> Range[-1, 1, 0.1]], 1]; In[12]:= lines = Line[{{x, 0}, {x, Sin[x]}}] /. %; In[13]:= Plot[Sin[x], {x, -\[Pi], \[Pi]}, Epilog -> {Hue[2/3], lines}] Falls du was anderes meinst, geht entsprechend vor. -- Hartmut |