Question

我有data.frame中的索引列表，我打算过滤掉给定的阈值。其中参考数值向量可以与阈值进行比较并且通过并行过滤出向量列表。如何轻松实现此并行过滤？任何人都可以提出我想要轻松完成任务的想法吗？

迷你示例：

myList <- list(f1=data.frame(1,2,3,4,1,1,2,4),
               f2=data.frame(1,5,2,3,4,6,1,5),
               f3=data.frame(1,4,6,7,2,3,3,5))

引用数字向量：

globSC <- data.frame(0.33,0.325, 0.118, 0.52,0.432, 0.59,0.37, 0.63)

我打算根据这个标准进行过滤：

saveMe <- globSC[[i]] <= 0.5

我希望的是：

saved_idx <- list(
  f1=data.frame(1,2,3,1,2),
  f2=data.frame(1,5,2,4,1),
  f3=data.frame(1,4,6,2,3)
)

droped_idx <- list(
  f1=data.frame(4,1,4),
  f2=data.frame(3,6,5),
  f3=data.frame(7,3,5)
)

如何获得预期的输出？非常感谢

Answer 1

使用lapply

saveMe <- sapply(globSC, function(x) x <= 0.5)
saved_idx <- lapply(myList, function(x) x[saveMe])
droped_idx <- lapply(myList, function(x) x[!saveMe])

在data.frame中对索引列表进行并行过滤的任何有效方法？

1 个答案: