r - 如何使用格子添加重叠直方图

Question

使用此问题中的数据 https://stackoverflow.com/questions/21663108/coloring-points-on-a-lattice-plot-in-r我想用histogram函数在 lattice在同一个图上绘制三个直方图，但分开绘制，以便我可以控制颜色并允许直方图重叠的半透明颜色。

但是，以下代码不起作用:

histogram(locs[locs.col=="darkblue"] , breaks=20, xlim=c(25,150),col="darkblue" )
histogram(locs[locs.col=="yellow"] , breeaks=20, xlim=c(25,150),col="yellow",add=T ) # add doesn't work here
histogram(locsy[locs.col=="red"] , breaks=20, xlim=c(25,150),col="red",add=T )

因为直方图不会相互添加。我知道这适用于 hist基本包中的函数，所以这里是我的问题:

1) 是否可以使用 histogram 将直方图添加到绘图中?
2) 我怎样才能使直方图的 bin 对于直方图的每个实例具有相同的宽度
3)如何使直方图重叠的颜色半透明？
4) 如何将直方图旋转 90 度，使其频率为水平轴？

Answer 1

重叠的直方图有时可以理解和提供信息，
但是，通常最好使用 bwplot或 violin plot ， 反正:

histogram( ~Sepal.Length,
     data = iris,
     type = "p",
     breaks = seq(4,8,by=0.2),
     ylim = c(0,30),
     groups = Species,
     panel = function(...)panel.superpose(...,panel.groups=panel.histogram,
                          col=c("cyan","magenta","yellow"),alpha=0.4),
     auto.key=list(columns=3,rectangles=FALSE,
                   col=c("cyan","magenta","yellow3"))
     )