2
Ich habe versucht, mit Barplot zu plotten, wenn hist(breaks=200)
, Barplot kann in verschiedenen Farben.Aber wenn hist(breaks=1000)
kann nicht die Farbe in Barplot ändern. Und warum wurde ylab
nicht im Barplot angezeigt, wenn drei Parzellen kombiniert wurden?kann die Farbe für Barplot nicht ändern, wenn kombinieren Plots
Hier ist mein Code: Pausen = 1000, nicht die Farbe ändern kann.
def.par <- par(no.readonly = TRUE) # save default, for resetting...
x <- pmin(3, pmax(-3, rnorm(5000)))
y <- pmin(3, pmax(-3, rnorm(5000)))
xhist <- hist(x, breaks=1000, plot=FALSE)
yhist <- hist(y, breaks=1000,plot=FALSE)
top <- max(c(xhist$density, yhist$density))
xrange <- c(-3,3)
yrange <- c(-3,3)
nf <- layout(matrix(c(2,0,1,3),2,2,byrow=TRUE), c(3,1), c(1,3), TRUE)#layout.show(nf)ZSSS
par(mar=c(3,3,0,0))
plot(x, y, xlim=xrange, ylim=yrange, xlab="T1", ylab="T2")
par(mar=c(0,3,1,1))
barplot(xhist$density, axes=TRUE, ylim=c(0, top),ylab="T3",col="red")
par(mar=c(3,0,1,1))
barplot(yhist$density, axes=TRUE, xlim=c(0, top),xlab="T4",space=0, horiz=TRUE,col="green")
par(def.par)
Danke Aber wissen Sie, warum die 'ylab' (T2, T3, T4) nicht in den drei Parzellen zeigten!? – Ziv