Hallo Bernhard,
ohne den Datensatz FB1 läuft das bei uns nicht, der Fehler ist also hier nicht nachzukochen. Bitte poste ein paar Beispieldaten, mit denen das Poblem auftritt.
viewtopic.php?f=20&t=11
Entschuldigung, da habe ich tatsächlich im Eifer des Gefechts nicht dran gedacht. Das entsprechende Item wäre mit folgenden Werten:
Code: Alles auswählen
Item4 <- c(5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 4, 4, 4, 4, 4, 4, 3, 2, 2)
barplot(table(Item4), ylim = c(0,12), axis.lty = 1,
main = "Item 4", ylab = "Häufigkeit",
xlab = "Kategorien", cex.lab=2,
cex.axis=2, cex.names = 2,
cex.main=2.5)
abline(v=round(mean(as.numeric(Item4)),1), col="firebrick3", lwd=3)
Wo sollte Deiner Meinung nach hier der Mittelwert eingezeichnet werden?
Wenn ich mir den Mittelwert ausgeben lasse, dann kommt 4,3 raus, eingezeichnet wird die Linie aber bei 4,0.
In vielen Fällen wird es einfacher, wenn man anstelle von barplot einfach die Funktion plot nimmt. In meinem Beispiel etwa so:
Code: Alles auswählen
n <- c(1, 1, 1, 1, 2, 2, 2, 2, 2, 10, 10)
plot(table(n))
abline(v = mean(n), col ="firebrick", lty=3)
Wenn ich den Plot mache, dann ist die Linie an der richtigen Stelle eingezeichnet
Das verstehe ich wirklich nicht, warum es da klappt und beim barplot nicht
Liebe Grüße,
Nadine