我有一个包含 year|country|growth_rate 列的数据框。我想找到每年增长率最高的国家,我这样做了:
ddply(data, .(year), summarise, highest=max(growth_rate))
我有两列的数据框;年和最高
我想在此处添加第三列,这将显示具有最大增长速率的国家/地区,但我不知道如何做到这一点。
R> data = data.frame(year = rep(1990:1993, 2), growth_rate = runif(8), country = rep(c("US", "FR"), each = 4))
R> data
year growth_rate country
1 1990 0.82785327 US
2 1991 0.86724498 US
3 1992 0.84813164 US
4 1993 0.35884355 US
5 1990 0.92792399 FR
6 1991 0.08659153 FR
7 1992 0.26732516 FR
8 1993 0.37819132 FR
R> ddply(data, .(year), summarize, highest = max(growth_rate), country = country[which.max(growth_rate)])
year highest country
1 1990 0.9279240 FR
2 1991 0.8672450 US
3 1992 0.8481316 US
4 1993 0.3781913 FR