我尝试在同一平面上叠加两个直方图,但hist()中的选项Probability = TRUE(相对频率)对下面的代码无效。这是一个问题,因为这两个样本的尺寸(长度(cl1)= 9和长度(cl2)= 339)有很大不同,并且通过这个脚本,我不能夸大两个直方图之间的差异,因为每个都显示频率。我怎样才能用相同的箱宽重叠两个直方图,显示相对频率?用R绘制直方图; y轴始终从比例/概率变为频率
c1<-hist(dataList[["cl1"]],xlim=range(minx,maxx),breaks=seq(minx,maxx,pasx),col=rgb(1,0,0,1/4),main=paste(paramlab,"Group",groupnum,"cl1",sep=" "),xlab="",probability=TRUE)
c2<-hist(dataList[["cl2"]],xlim=range(minx,maxx),breaks=seq(minx,maxx,pasx),col=rgb(0,0,1,1/4),main=paste(paramlab,"Group",groupnum,"cl2",sep=" "),xlab="",probability=TRUE)
plot(c1, col=rgb(1,0,0,1/4), xlim=c(minx,maxx), main=paste(paramlab,"Group",groupnum,sep=" "),xlab="")# first histogram
plot(c2, col=rgb(0,0,1,1/4), xlim=c(minx,maxx), add=T)
cl1Col <- rgb(1,0,0,1/4)
cl2Col <- rgb(0,0,1,1/4)
legend('topright',c('Cl1','Cl2'),
fill = c(cl1Col , cl2Col), bty = 'n',
border = NA)
在此先感谢您的帮助!
示例数据将有所帮助 – russellpierce 2013-02-20 14:31:29
将来,请dput()重现您的问题所需的相关对象。 – russellpierce 2013-02-20 15:03:40