r - 查找包含矢量元素的列表对象

我有一个向量列表。有什么方法可以在下面的设置中查找包含特定矢量元素的列表对象？

示例数据：

> head(mylist)
$ENSG00000049449
[1]   5954 440034

$ENSG00000050327
[1]      7984 102725117

$ENSG00000072195
[1]     29904 100996693

$ENSG00000091262
[1]       368 105369239

$ENSG00000100031
[1]      2678     91227     92086    728441 102724197

$ENSG00000103319
[1]     29904 101930123

预期产量：

>magicalstuff(7984)
[1] "ENSG00000050327"

>magicalstuff(29904)
[1] "ENSG00000072195" "ENSG00000103319"

谢谢！

最佳答案

例如：

names(mylist)[(unlist(lapply(mylist, function(x) 29904 %in% x)))]
[1] "ENSG00000072195" "ENSG00000103319"