ich möchte die Darstellung folgender Histogramme ändern, indem diese in vertikaler Richtung weiter auseinander gezogen sind. Es sollen also die Wertebereiche von y nicht geändert werden, sondern nur die Darstellung der Balken.
Daten, mit denen ich arbeite, beziehe ich von hier (Datei: mietspiegel99.csv):
https://ci.inf-i2.uni-jena.de/so54pom/s ... line=false
Der verwendete Code lautet folgendermaßen (Funktion für Erstellung der Histogramme verwendet):
Code: Alles auswählen
df <- as.data.frame(read.csv("mietspiegel99.csv"))
drawHist <- function(data,xbreaks,xlimit,ylimit,maintitle,xtitle,ytitle,xTicks,yTicks) {
hist(
data, breaks=xbreaks, freq = FALSE,
xlim=xlimit, ylim=ylimit, axes = FALSE,
main=maintitle, xlab = xtitle, ylab = ytitle)
axis(1,at = xTicks)
axis(2,at = yTicks)
lines(density(data))
}
drawHist(
df$miete, seq(0,3600,by=100),
c(0,3600),c(0,0.0015),
"Histogramm und Kerndichteschätzer: Nettomiete","Nettomiete in DM","Dichte",
seq(0,3600,by=400),seq(0,0.0015,by=0.0005))
drawHist(
df$mieteqm, seq(0,35,by=1),
c(0,35),c(0,0.8),
"Histogramm und Kerndichteschätzer: Nettomiete pro qm","Nettomiete pro qm in DM","Dichte",
seq(0,35,by=5),seq(0,0.08,by=0.02))
drawHist(
df$mieteqm, seq(0,35,by=1),
c(0,35),c(0,0.8),
"Histogramm und Kerndichteschätzer: Nettomiete pro qm","Nettomiete pro qm in DM","Dichte",
seq(0,35,by=5),seq(0,0.08,by=0.02))
drawHist(
df$flaeche, seq(20,160,by=4),
c(20,160),c(0,0.2),
"Histogramm und Kerndichteschätzer: Wohnfläche in qm","Wohnfläche pro qm","Dichte",
seq(20,160,by=20),seq(0,0.02,by=0.005))
Ist das vielleicht eine Einstellung von par, die bei mir nicht korrekt ist?
Danke euch!
LG