检查向量元素是否在列表的相应元素中

Question

我有两个向量，a和b，这是a <- c(1,3)，另一个b <- list(c(1,4),c(2,5))。

是否有任何优雅的方式来找到a中的元素是否在b的相应行中？

例如，a[1]在b[1]，a[2]不b[2]，所以我应该得到的c(TRUE, FALSE)矢量值。我试过a %in% b，这是错误的。

Answer 1

你可以使用sapply遍历指数idx，检查是否a[idx]是b[[idx]]：

sapply(seq_along(a), function(idx) a[idx] %in% b[[idx]]) 
# [1] TRUE FALSE