调整条形图中的轴限制ggplot2

Question

任何人都可以帮我将图中横轴的极限设置为（0,1）吗？以下代码不起作用。

set.seed(234)
data <- data.frame(var1 = c(rep('A',3),rep('B',3)),
                   var2 = runif(6), 
                   var3 = rep(c('x1','x2','x3'),2))

ggplot(data,aes(x=var1,y=var2,fill=factor(var3))) + 
   geom_bar(stat="identity",position="dodge") + 
   scale_y_continuous(breaks=c(0,0.5,1.0)) +
   coord_cartesian(ylim=c(0,1.0)) +
   coord_flip()

Answer 1

不需要coord_cartesian（），你可以直接将ylim arg传递给coord_flip（）。

set.seed(234)
library(ggplot2)
data <- data.frame(var1 = c(rep('A',3),rep('B',3)),
               var2 = runif(6), 
               var3 = rep(c('x1','x2','x3'),2))

ggplot(data,aes(x=var1,y=var2,fill=factor(var3))) + 
  geom_bar(stat="identity",position="dodge") + 
  scale_y_continuous(breaks=c(0,0.5,1.0)) +
  coord_flip(ylim = c(0, 1))

http://docs.ggplot2.org/0.9.3.1/coord_flip.html