Question

我有以下数据集：

a<-data.frame(time=c("before","after","before","after"),
                  company=c(1,1,2,2),
                  value=c(3.751522,4.776224,3.838707,2.644144 ))

要绘制图形，我使用了以下代码

a$company<-as.factor(a$company)
ggplot(a, aes(x=company, y=value, fill=time)) + geom_col(position="dodge")

结果，我得到了两家公司的前后数字。但是，如何解决公司的第一个竖条对应于前后的问题，而不是像我的图中那样反之亦然的问题？

Answer 1

这是否达到您想要的目标？

a<-data.frame(time=factor(c("before","after","before","after"),
                          levels = c("before", "after")),
              company=c(1,1,2,2),
              value=c(3.751522,4.776224,3.838707,2.644144 ))
a$company<-as.factor(a$company)
ggplot(a, aes(x=company, y=value, fill=time)) + geom_col(position="dodge")

如何确定X轴名称？

1 个答案: