r - 在ggplot2中使用geom_ribbon反转X和Y轴

Question

是否可以使用 ggplot2 包中的 geom_ribbon，但范围是水平而不是垂直绘制的。如果“geom_ribbon”提出选项 xmin/xmax，这将是微不足道的，但事实并非如此。

这是我的数据，用于测试的简化绘图功能和我获得的数字。所以在这个例子中，我想让“深度”轴垂直显示。

prof <- read.table(text = " depth prop mean error
1 5 FALSE 2.12 0.035
2 15 FALSE 2.06 0.035
3 25 FALSE 1.54 0.035
4 35 FALSE 0.92 0.033
5 45 FALSE 0.71 0.028
6 55 FALSE 0.60 0.026
7 65 FALSE 0.54 0.024
8 75 FALSE 0.49 0.023
9 85 FALSE 0.46 0.022
10 95 FALSE 0.43 0.022
11 105 FALSE 0.41 0.022
12 115 FALSE 0.39 0.021
13 5 TRUE 2.18 0.061
14 15 TRUE 2.11 0.061
15 25 TRUE 1.58 0.054
16 35 TRUE 0.97 0.047
17 45 TRUE 0.76 0.042
18 55 TRUE 0.67 0.043
19 65 TRUE 0.61 0.040
20 75 TRUE 0.54 0.033
21 85 TRUE 0.48 0.028
22 95 TRUE 0.45 0.027
23 105 TRUE 0.43 0.025
24 115 TRUE 0.40 0.022", header=TRUE)

ggplot(prof, aes(colour = prop, fill = prop)) + 
  geom_ribbon(aes(x = depth, ymin = mean-error, ymax = mean+error), 
  alpha = 0.6, colour = NA)

Answer 1

看看 coord_flip() 这是未经测试的，因为您没有以简单的格式提供数据。发布 dput(your.data.frame) 的输出以提供数据。

ggplot(prof, aes(x = depth, ymin = mean - error, ymax = mean + error, 
    fill = prop)) + geom_ribbon() + coord_flip()

并且请在键入代码时使用键盘底部的大条空白使文本更具可读性代码也是文本