我们能把R中直方图X轴上的值求和吗

我在r中有一个数据集，我正试图在其上创建一个直方图

x轴上的变量是CR_DT，即日期，x轴上的变量需要权重之和，即y轴上的测试$CHG_WT。我尝试了很多研究，但没有找到解决方案，因此请大家提出建议

CR_DT = c("13-Mar-15", "31-Mar-15", "15-Mar-15", "17-Mar-15")
CHG_WT = c(770,3730,70, 100,600,2000)

因此，我需要直方图中基于CR_DT的CHG_WT之和

---

谢谢

只有当CR_DT和CHG_WT具有相同的长度并且CR_DT有一些重复时，这才有意义

CR_DT = c("13-Mar-15", "31-Mar-15", "15-Mar-15", "17-Mar-15","15-Mar-15","13-Mar-15")
CHG_WT = c(770,3730,70, 100,600,2000)
CR_DTs=unique(CR_DT)
CHG_WTs=sapply(CR_DTs,function(d)sum(CHG_WT[CR_DT==d]))
barplot(CHG_WTs,names.arg = CR_DTs,col=rainbow(length(CHG_WTs)),cex.names = .5)

---

感谢罗伯特的帮助。