Displaying 1 result from an estimated 1 matches for "chancenprofil".
2007 Oct 12
1
Batch-Plot Histograms
...=".")
Stadtwerke<-colnames(matrix)
Bereich_blau<-66.67
Schleifen<-dim(matrix)[2]
Plan<-c(35.46,1.75,63.49,13.52,39.38,21.83)
Median<-apply(matrix,2,median)
breaks<-round((0.01)*dim(matrix[1]))
for(i in 1:Schleifen){
hist(matrix[,i],main=paste("Risiko-Chancenprofil der Stadtwerke ",
Stadtwerke[i]),col="blue",xlab="EBIT in Mio. €", ylab="Häufigkeit",breaks[1])
abline(v=Median[i],lwd=2,col="grey",lty=3)
axis(side=1,at=Median[i],labels="Median",col="grey")
hist_data<-hist(matrix[,i],...