使用ggplot2中的geom_ribbon反转X和Y轴

9

是否可以使用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)

enter image description here

1个回答

11

看看coord_flip()。由于您没有以易于处理的格式提供数据,因此此代码未经过测试。请发布dput(your.data.frame)的输出以提供数据。

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

请在敲代码时使用键盘底部的大空格键,留白可以使文本更易读,代码也是文本。


4
好的,我会尽力做到最好。以下是需要翻译的内容:+1 特别是最后一段(虽然您应该也明白,因为您的答案有效) - A5C1D2H2I1M1N2O1R2T1
1
谢谢,这就是我需要的,以及scale_x_reverse()。 - fstevens

网页内容由stack overflow 提供, 点击上面的
可以查看英文原文,
原文链接