R 图条组

我正在学习ggplot2，我想按原样使用数据框绘制条形图，如果可能的话，不需要进行转换

数据帧：

我想这样画：

---

谢谢，

我做了一些与你相似的人工数据。我已更新以包含以下标签：

df=data.frame(cd=seq(0,4),October=c(128,68,29,21,75),November=c(90,80,15,11,80),December=c(55,151,28,7,79))%>%
  melt(id.vars="cd",variable.name="Month")
df$cd<-as.factor(as.character(df$cd))
ggplot(df,aes(x=Month,y=value,fill=cd,label=value))+geom_col(position=position_dodge())+
  geom_text(size = 4, position =position_dodge(1),vjust=-.5)

---

查看

？geom_col

和示例。请不要将数据作为图片共享，我们无法将其复制到会话中。到目前为止你尝试了什么？@Axeman抱歉，我尝试将其作为一张桌子共享，但它不是真正的“可复制”，因此不会有多大帮助。。。我将来应该如何共享数据？thanks@gmarais，这里有很多有用的建议：谢谢@gmarais：您可以使用dput（）将数据帧（和其他对象）转换为代码，谢谢。因此，我必须

熔化
我的数据，以便按原样使用ggplot？如果你可以从这开始作为一个评论，那么我可以接受答案。.嗨，gmarais，ggplot的工作原理与R（和excel）中的基本绘图有点不同。如果要绘制不同的变量（列），而不是逐个拾取它们，则必须将值放在一列中，并使用因子将其放在其他列中。我发现melt函数可以很方便地完成这项工作，但是其他方法也可以完成这项工作。
ggplot(df,aes(x=cd,y=value,fill=Month,label=value))+geom_col(position=position_dodge())+
  geom_text(size = 4, position =position_dodge(1),vjust=-.5)