r - 如何检查列表是否包含 R 中的某个元素

Question

我有以下 list

A = list(c(1,2,3,4), c(5,6,7,8), c(4,6,2,3,1), c(6,2,1,7,12, 15, 16, 10))
A
[[1]]
[1] 1 2 3 4

[[2]]
[1] 5 6 7 8

[[3]]
[1] 4 6 2 3 1

[[4]]
[1]  6  2  1  7 12 15 16 10

我想检查元素是否2是否存在每个列表。如果存在，那么我需要分配 1到相应的列表。

先感谢您。

Answer 1

@jasbner 的评论可以进一步细化为

1 * sapply(A, `%in%`, x = 2)
# [1] 1 0 1 1

在这种情况下 sapply返回一个逻辑向量，然后乘以 1 强制 TRUE至 1和 FALSE到 0。另外，因为语法是 x %in% table ，我们可以避免定义匿名函数 function(x) 2 %in% x而是像上面那样写。最后，使用 sapply而不是 lapply返回一个向量而不是一个列表，这似乎是你所追求的。