使用data.table在每个组中显示顶部/底部K

Question

此代码显然不起作用：

dt <- ggplot2::diamonds %>% data.table();dt <- dt [1:20];dt
K=3
dt [(.N-K):.N ,, by =cut]
dt [1:K,, by =cut]

正确的方法是什么？

Answer 1

做到了。

 dt[, tail(.SD, K), by=cut, .SDcols=1:ncol(dt)]
 dt[, head(.SD, K), by=cut, .SDcols=1:ncol(dt)]

还是，还有更好的方法吗？