大家好，正在处理一个数据表，但一个看似很简单的语句，总是实现不了，麻烦看看是怎么回事儿？原数据有9个变量
hs_id countryexp_or_imp pname year value hsid4factorrealvalue
1 90022090 德国 进口 北京协和医药科技开发总公司 200018009002 0.780961405.7280
2 90083090 日本 进口 北京协和医药科技开发总公司 200060109008 0.780964693.5696
……

例如，我要按照国别汇总进口或出口最多的国家或地区
使用：
处理imp只包含进口的行后，

pro21imp<-aggregate(imp[,9],list(imp$country),sum) ##进口按照国别

pro21imp<- pro21imp[order(-pro21imp$x),]

然而，发现处理后的行中，多次出现重复的国家，例如

> pro21imp[1:20,]

Group.1 x

217 韩国 222773619920

293 日本 164312172168

366 中国94436744319

266 美国92276835166

322 台澎金马关税区89646559678

182 德国66959402717

324 台湾省57619616797

323 台湾52085918730

367 中华人民共和国28442808635

103 台湾省19400378233

48 韩国15449592879

86 日本12191256230

357 英国11538746328

132 中华人民共和国10472372236

192 法国10237974280

344 新加坡 9909631447

325 泰国 9765276985

259 马来西亚 9079832758

295 瑞士 7889710776

354 意大利 6723476801

可以看到日本，韩国等均出现了多次

请问我的处理哪里出现了问题？应该如何实现呢？

谢谢大家，敬请指教：）