Question

我正在尝试将胡须定义更改为最小值和最大值（即，不要将任何内容视为异常值），如this question中所示，但仅限于单个级别的映射到x轴的因子。该答案中的代码将改变整个情节的胡须定义。

如果有的话，有什么方法可以解决这个问题？

Answer 1

扩展问题中链接的示例，您可以执行以下操作：

f <- function(x) {
  r <- quantile(x, probs = c(0.05, 0.25, 0.5, 0.75, 0.95))
  names(r) <- c("ymin", "lower", "middle", "upper", "ymax")
  r
}

# sample data
d <- data.frame(x = gl(2,50), y = rnorm(100))

# do it
ggplot(d, aes(x, y)) + 
  stat_summary(data = subset(d, x == 1), fun.data = f, geom = "boxplot") +
  geom_boxplot(data = subset(d, x == 2))

在这种情况下，因子x == 2获得“常规”geom_boxplot，但因子x == 1是“扩展”。

在你的情况下，并且有点抽象，你可能想要做这样的事情：

ggplot(d, aes(x, y)) + 
  stat_summary(data = subset(d, x == "special_factor"), fun.data = f, geom = "boxplot") +
  geom_boxplot(data = subset(d, x != "special_factor"))

在`geom_boxplot`中仅更改一个因子级别的晶须定义

1 个答案: