matheraum.de
Raum für Mathematik
Offene Informations- und Nachhilfegemeinschaft

Für Schüler, Studenten, Lehrer, Mathematik-Interessierte.
Hallo Gast!einloggen | registrieren ]
Startseite · Forum · Wissen · Kurse · Mitglieder · Team · Impressum
Forenbaum
^ Forenbaum
Status Schulmathe
  Status Primarstufe
  Status Mathe Klassen 5-7
  Status Mathe Klassen 8-10
  Status Oberstufenmathe
    Status Schul-Analysis
    Status Lin. Algebra/Vektor
    Status Stochastik
    Status Abivorbereitung
  Status Mathe-Wettbewerbe
    Status Bundeswettb. Mathe
    Status Deutsche MO
    Status Internationale MO
    Status MO andere Länder
    Status Känguru
  Status Sonstiges

Gezeigt werden alle Foren bis zur Tiefe 2

Navigation
 Startseite...
 Neuerdings beta neu
 Forum...
 vorwissen...
 vorkurse...
 Werkzeuge...
 Nachhilfevermittlung beta...
 Online-Spiele beta
 Suchen
 Verein...
 Impressum
Das Projekt
Server und Internetanbindung werden durch Spenden finanziert.
Organisiert wird das Projekt von unserem Koordinatorenteam.
Hunderte Mitglieder helfen ehrenamtlich in unseren moderierten Foren.
Anbieter der Seite ist der gemeinnützige Verein "Vorhilfe.de e.V.".
Partnerseiten
Weitere Fächer:

Open Source FunktionenplotterFunkyPlot: Kostenloser und quelloffener Funktionenplotter für Linux und andere Betriebssysteme
StartseiteMatheForenMathematicaPlot: Punktbeschriftung
Foren für weitere Schulfächer findest Du auf www.vorhilfe.de z.B. Informatik • Physik • Technik • Biologie • Chemie
Forum "Mathematica" - Plot: Punktbeschriftung
Plot: Punktbeschriftung < Mathematica < Mathe-Software < Mathe < Vorhilfe
Ansicht: [ geschachtelt ] | ^ Forum "Mathematica"  | ^^ Alle Foren  | ^ Forenbaum  | Materialien

Plot: Punktbeschriftung: Frage (beantwortet)
Status: (Frage) beantwortet Status 
Datum: 16:41 Di 20.03.2012
Autor: pingi

Hallo,

ich habe eine Liste von Koordinatenpaaren KOORD, die ich plotte mit:


plot = ListPlot[KOORD, AspectRatio -> Automatic, PlotStyle -> {Green, AbsolutePointSize[12]}]



und will bei den einzelnen Koordinaten den Index der Koodinate in der Liste plotten in der Weise:



dotlabel[i] = Graphics[Text[str[i], {xi, yi}]]

wobei str[i] = ToString[i]


und schließlich mit

Show[plot,FOR[i=1,i <= idim, i++, dotlabel[i]]]

plotten.



So weit so schön. Doch ... wie komme ich an den Index i heran? Oder muss ich via DO-Schleife idim fache Listplots erzeugen, und diese schließlich kombinieren?

Vielen Dank für jeden Tipp.

Harry



Ich habe diese Frage in keinem Forum auf anderen Internetseiten gestellt.

        
Bezug
Plot: Punktbeschriftung: Antwort
Status: (Antwort) fertig Status 
Datum: 15:55 Do 22.03.2012
Autor: Peter_Pein

Hallo Harry,

Die Funktion MapIndexed tut's (zusammen mit einer anonymen Funktion):

MapIndexed[Text[Style[#2[[1]], 8], #1] &, koord] ist das Wesentliche (siehe [a]Anhang).

Peter



Dateianhänge:
Anhang Nr. 1 (Typ: nb) [nicht öffentlich]
Bezug
Ansicht: [ geschachtelt ] | ^ Forum "Mathematica"  | ^^ Alle Foren  | ^ Forenbaum  | Materialien


^ Seitenanfang ^
www.schulmatheforum.de
[ Startseite | Forum | Wissen | Kurse | Mitglieder | Team | Impressum ]