在点图上绘制置信度或预测区间 ggplot2

Question

我想绘制一些来自某个分布的数据的预测区间，我已经计算了 95% 的预测区间。假设我有这个代码

require(ggplot2)
require(reshape2)


dummy_data <- data.frame(x=rnorm(100, 15,2), y=rnorm(100, 17,2), z=rnorm(100,13, 2))
melted_dd <- melt(dummy_data)

pi_limits <- data.frame(start=c(10.2, 14.3, 9.2), end=c(17.2, 20.4, 18.9))
row.names(pi_limits) <- c("x", "y", "z")


ggplot() + geom_point(data=melted_dd, aes(x=value, y=variable)) + theme_minimal()

现在我想在离散 y 轴上绘制所有变量的预测区间限制，这些变量覆盖 pi_limits 中给定的距离，并带有从开始到结束的特定彩色条。当谈到这个问题时，我已经在这个网站上查看了解决方案，我得到的最接近的是使用 geom_ribbon 但这似乎适合折线图，或者也许我不明白如何正确使用它。有人可以帮我吗？

Answer 1

您可能想要

geom_linerange()

：

library(ggplot2)

ggplot() + 
  geom_point(data=melted_dd, aes(x=value, y=variable)) +
  geom_linerange(
    data = pi_limits, 
    aes(xmin = start, xmax = end, y = variable, color = variable), 
    linewidth = 6,
    alpha = 0.5,
    show.legend = FALSE
  ) +
  theme_minimal()