r - 带 Lattice & panel.bpplot 的垂直箱形百分位图

Question

我正在使用 Hmisc (panel.bpplot) 中的 box-percentile 面板函数和 bwplot 在 R 中绘制 box-percentile 图来自 格子。

我有一个数值向量 (Length)，并想显示它在因子变量 (Month) 水平上的分布。

这是一个假数据的例子:

例如，

set.seed(13)
Length<-sample(1:10, 1000, replace=TRUE)
Month<-sample(c("Apr","May","Jul","Aug","Sep","Nov"), 1000, replace=TRUE)

df<-cbind(Month, Length)
df<-as.data.frame(df)   
df$Month<-factor(df$Month, levels=c("Apr","May","Jul","Aug","Sep","Nov"))
df$Length<-as.numeric(df$Length)

#plot horizontal box-percentile plot; 
bwplot(Month~Length, data=df, panel=panel.bpplot)

这很好用。但我希望这些图是垂直的，x 轴上是Month，y 轴上是Length。 panel.bpplot 的文档说水平图使类别级别更明显，但是，出于我的目的，我特别需要一个垂直图。有没有办法修改 panel.bpplot 来做到这一点？

Answer 1

我从这个 previous question 中得到了一些提示然后将其与您的代码合并。似乎“技巧”是设置旋转网格:

require(grid)
grid.newpage()
pushViewport(viewport(angle = 90, name = "VP"))
print(
    bwplot(Month~Length, data=df, panel=panel.bpplot, draw.in = "VP"
    ),
    newpage=FALSE
)

结果是: