R：ggplot2 点范围示例

Question

我目前正在阅读 Hadley Wickham 的 R for Data Science。其中，有以下示例：

library(tidyverse)

ggplot(data = diamonds) + 
stat_summary(
    mapping = aes(x = cut, y = depth),
    fun.ymin = min,
    fun.ymax = max,
    fun.y = median
)

现在，有一个问题是如何使用适当的geom_ 函数创建相同的图。我查看了stat_summary 的默认geom，它是pointrange。

所以我尝试了以下方法：

ggplot(data = diamonds) + geom_pointrange(mapping = aes(x = cut, y = depth), stat = "summary")

但我没有得到情节上的min 和max 点。

如何使用geom_pointrange 获得准确的绘图？

Answer 1

geom_pointrange 不会自动计算 ymin 或 ymax 值。您可以使用stat = "summary" 执行此操作，同时仍使用geom_pointrange：

ggplot(data = diamonds) +
  geom_pointrange(mapping = aes(x = cut, y = depth),
                  stat = "summary",
                  fun.ymin = min,
                  fun.ymax = max,
                  fun.y = median)

Answer 2

我能想到的简单方法就是使用 geom_line 和 stat_summary

 ggplot(data = diamonds, mapping = aes(x = cut, y = depth)) +
     geom_line() +
     stat_summary(fun.y = "median", geom = "point", size = 3)

这将给出非常相似的情节。

如果我真的想使用geom_pointrange，我会先做小数据集。

data = diamonds %>%
    group_by(cut) %>%
    summarise(min = min(depth), max = max(depth), 
        median = median(depth))

ggplot(data, aes(x = cut, y = median, ymin = min, ymax = max)) + 
    geom_linerange() + 
    geom_pointrange()

这将生成完全相同的图。希望这可以帮助！

Answer 3

我在未来三年，我也有同样的疑问，但这里没有一个解决方案对我有用。我能够使用此代码实现所需的输出（只是为了帮助我的时间的人们）：

ggplot(data = diamonds) +
  geom_pointrange(
    mapping = aes(x = cut, y = depth),
    stat = "summary",
    fun.min = min,
    fun.max = max,
    fun = median
  )