r使用条件data.table删除

r使用条件data.table删除,r,data.table,R,Data.table,我有一个data.table,我想删除变量开关上具有相同值的id 我希望这个出口 可复制数据请在下次提供: DT <- data.table( id = rep(1L:7L, c(3L, 4L, 3L, 3L, 1L, 2L, 2L)), Switch_f = c(0L, 0L, 1L, 0L, 0L, 1L, 1L, 0L, 1L, 1L, 0L, 0L, 0L, 1L, 1L, 1L, 0L, 1L), sex = rep(c(1L, 2L, 1L, 2L), c(7L,

我有一个data.table,我想删除变量开关上具有相同值的id

我希望这个出口

可复制数据请在下次提供:

DT <- data.table(
  id = rep(1L:7L, c(3L, 4L, 3L, 3L, 1L, 2L, 2L)),
  Switch_f = c(0L, 0L, 1L, 0L, 0L, 1L, 1L, 0L, 1L, 1L, 0L, 0L, 0L, 1L, 1L, 1L, 0L, 1L),
  sex = rep(c(1L, 2L, 1L, 2L), c(7L, 3L, 3L, 5L))
)
也许你可以试试下面的subset+ave

subset(df,as.logical(ave(Switch_f,id,FUN = function(x) length(unique(x))>1)))

保留组有多个唯一的开关f值

向下投票,因为数据应该以可复制的形式共享,而不是以图像的形式共享。好的,很抱歉,对于下一篇文章,我将给出一个可复制的示例
subset(df,as.logical(ave(Switch_f,id,FUN = function(x) length(unique(x))>1)))