ggplot geom_bar - '旋转和翻转'?

时间:2012-07-13 07:38:03

标签: r ggplot2

test <- data.frame(
    y=seq(18,41,1),
    x=24:1
)

ggplot(test, aes(y=y, x=x)) + geom_bar(stat="identity", aes(width=1)) + 
    opts( axis.text.x = theme_blank(), axis.ticks.x = theme_blank()) + 
    scale_x_continuous(breaks=NULL) + 
    coord_cartesian(ylim = c(17, 42))

enter image description here

就旋转和翻转而言,我希望该图中的y轴是沿着顶部的x轴,右边的x轴是什么。因此,条形图正在从图的右侧“出来”,顶部最长/最高,底部最短。如果它顺时针旋转90度,然后翻转一条可以实现它的垂直线。

coord_flip()和scale_y_reverse()在正确的道路上走了一段路。

编辑:

我猜这非常接近,只需要将y轴放到图表的顶部。

ggplot(test, aes(y=y, x=x)) + geom_bar(stat="identity", aes(width=1)) + 
    opts(axis.text.y = theme_blank(), axis.ticks.y = theme_blank()) + 
    scale_x_continuous(breaks=NULL) + scale_y_reverse() + coord_flip()  + scale_x_reverse()

1 个答案:

答案 0 :(得分:10)

不完全是你描述的,但也许足够接近?

ggplot(test, aes(y=y, x=x)) + geom_bar(stat="identity", aes(width=1)) +
  coord_flip() +
  xlim(24, 1) +
  ylim(42, 0)

诀窍是以相反的顺序使xlimylim参数。您的轴位置仍然是底部和左侧......

enter image description here