檢查向量元素是否在列表的相應元素中

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