0

我是 lattice 的新手，我需要创建一个箱形图，其中 y 值代表电流。数据按从 1/24 到 8/1 的不同比率进行整理。幸运的是，我得到了框的相对位置以尊重实际比率。我想要实现的是使用“1/24”、1/12 等 x-labels 而不是“0.04166667”、0.08333333 等。你可以看到下面的代码示例。我在面板函数内部尝试了不同的方法，还探索了 scales 参数。数据经过调节并产生 4 个面板。棘手的一点是右侧的面板和左侧的面板具有不同的 x 范围。

编码：

bwplot(current~factor(ac.ratio)|factor(constant.electrode)+factor(substrate), data=current.df, 
       scales=list(x=list(relation="free",
                          at=c(1/24, 1/12, 1/6, 1/3, 2/3, 1, 2, 4, 8),
                          labels = FALSE), 
                   y="same"), 
       layout=c(2,2), index.cond=list(2:1, 2:1))

我得到的一个例子是： 在此处输入图像描述

我需要的是类似于： 在此处输入图像描述

左侧面板中的位置也必须重叠（如右侧面板中的位置）。这就是我需要的（面板标题仅作为示例，不是最终的）。非常感谢。

4

1 回答 1

0

这是一个使用xyplot代替bwplot并在内部调用的解决方案panel.bwplot。我不得不手动调整box.width以获得合理的结果。

library(lattice)

dd <- data.frame(
  current = rnorm(200, 350, 50),
  ac.ratio = sample(c(1/24, 1/12, 1/6, 1/3), 200, replace = TRUE),
  substrate = gl(2, k = 100, labels = c("Acetate", "OECD"))
)

xyplot(current ~ ac.ratio | substrate, data = dd, box.width = 0.02,
       scales = list(x = list(at = c(1/24, 1/12, 1/6, 1/3),
                              labels = c("1/24", "1/12", "1/6", "1/3"))),
       panel = panel.bwplot, horizontal = FALSE)

伊姆古尔

于 2017-02-11T08:12:50.793 回答