目标：按季度和名称分组我希望按计数获得前 n 个名称（请参见下面的示例）。因此，top 1 的所需输出（对于下面的示例）将是：
2019 Q1 Klaus 2
2019 Q2 Karl 3
由于这只是一个简单的示例，因此我还希望获得按季度计数和名称排列的前 4、5 名等。您对如何实现这一点有什么好的想法吗data.table（不，dplyr请）。非常感谢！
library(data.table)
dt <- data.table(x = c("2019 Q1", "2019 Q1", "2019 Q1", "2019 Q2", "2019 Q2", "2019 Q2", "2019 Q2"),
y = c("Klaus", "Gustav", "Klaus", "Karl", "Karl", "Karl", "Stefan"))
# Structure of dt
# x y
# 1: 2019 Q1 Klaus
# 2: 2019 Q1 Gustav
# 3: 2019 Q1 Klaus
# 4: 2019 Q2 Karl
# 5: 2019 Q2 …