如何更具年份将数据相加，并且绘图

Question

我想要绘制Albania每一年suicide总量的趋势图

我的想法是将Albania每一年的suicide_no相加，然后制作一个bar plot（x轴为年份，y轴为自杀人数（suicide_no））

Answer 1

使用dplyr包的管道函数对数据进行处理，使用了类似的数据集测试结果正常，可以参考一下如下代码：

library(dplyr)
data=read.csv('master.csv',header=TRUE)
ndf<-subset(data,country=='Albania')
#print(ndf)
gr<-ndf %>%
group_by(year) %>%
summarise(suicides_no=sum(suicides_no))
#gr[is.na(gr)]<-0
print(gr)
b<-barplot(gr[['suicides_no']],names.arg=gr[['year']],col = "#1b98e0",xlab='year',ylab='suicides_no')
b

如果对你有帮助，请点击我回答的右上方采纳按钮给予采纳。