我有一个数据框，其中每一行代表一个记录的事件。举个例子，假设我测量了过往汽车的速度，有些汽车不止一次地超过了我。
cardata <- data.frame(
car.ID = c(3,4,1,2,5,4,5),
speed = c(100,121,56,73,87,111,107)
)
我可以对列表进行排序并找出三个最快的事件...
top3<-head(cardata[order(cardata$speed,decreasing=TRUE),],n=3)
> top3
car.ID speed
2 4 121
6 4 111
7 5 107
...但您会注意到，汽车 4 记录了两次最快的时间。如何在没有任何重复汽车 ID 的情况下找到三个最快的事件？我意识到在这种情况下，“前三名”名单可能不包括三个最快的赛事。
最佳答案
您可以使用 aggregate首先找到每个 car.ID 的最高速度:
cartop <- aggregate(speed ~ car.ID, data = cardata, FUN = max)
top3 <- head(cartop[order(cartop$speed, decreasing = TRUE), ], n = 3)
# car.ID speed
# 4 4 121
# 5 5 107
# 3 3 100
关于r - 在 R 中创建 'Top 10' 列表，我们在Stack Overflow上找到一个类似的问题： https://stackoverflow.com/questions/19798189/