r - 选择具有多个不同值的组

Question

我有一个分组变量(“来自”)和值(“数字”)的数据:

from number
   1      1
   1      1
   2      1
   2      2
   3      2
   3      2

我想对数据进行子集化并选择具有两个或多个唯一值的组。在我的数据中，只有第 2 组具有多个不同的“数字”，因此这是所需的结果:

from number
   2      1
   2      2

Answer 1

几种可能性，这是我最喜欢的

library(data.table)
setDT(df)[, if(+var(number)) .SD, by = from]
#    from number
# 1:    2      1
# 2:    2      2

基本上，每组我们都在检查是否有任何差异，如果 TRUE ，然后返回组值

使用基础 R，我会选择

df[as.logical(with(df, ave(number, from, FUN = var))), ]
#   from number
# 3    2      1
# 4    2      2

编辑 :对于非数字数据，您可以尝试新的 uniqueN the devel version 的函数的 data.table (或使用 length(unique(number)) > 1 代替

setDT(df)[, if(uniqueN(number) > 1) .SD, by = from]