Grafiken und Statistik in R

3 Grafik 3.2 Diagramme
par(las=1) # Ausrichtung Achsenbeschriftung
plot.depth(testmarker,
xaxis.num=c(rep("s", 8), "n"), # 8x x-Achse ja, 9. keine
plot.type=c(rep("n", 8), "h"), # 8x Grafiktyp "n", 9. "h"-histogrammartig
polygon=c(rep(TRUE, 8), FALSE ), # 8x Polygon 9. kein
plot.after=list( # was NACH dem eigentlichen Zeichnen passieren soll
NULL, NULL, NULL, NULL, NULL, NULL, NULL, NULL,
# 1. 2. 3. 4. 5. 6. 7. 8. Grafik
expression( # 9. Grafik; WICHTIG die Reihenfolge: Punkte zuerst, dann Text
points( # Punkte
y=testmarker[,1], # Spalte 1
x=testmarker[,10]-2 , # Werte Spalte 10 subtrahiert um 2
pch=22, # gefülltes Rechteck; Typen allgemein auf Seite 30
bg="white", # Punkt-Hintergrund weiß
cex=4 # 4-fache Vergrößerung
),
text( # Text die eigentlichen Marker
y=testmarker[marker.wo.index, 1], # nur wo keine NA enthalten
x=testmarker[marker.wo.index, 10]-2 ,
labels=marker.text, # entsprechender Text
col="darkred", # Farbe
cex=2 # 2-fache Vergrößerung
)
) # Ende 9. Grafik
) # Ende plot.after list()
) # Ende plot.depth()
−20
−25
−30
−35
−40
−45
Gattung artname a
Gattung artname b
Gattung artname c
Gattung artname d
Gattung artname e
Gattung artname f
Gattung artname g
Gattung artname h
−50
0 20 40 60 80 0 20 40 60 80 0 20 40 0 20 40 60 80 0 20 40 60 80 0 20 40 60 80 0 20 40 60 80 0 20 40 60 80
Marker
1
2
3
4
5
71