基于逻辑条件的列表中的子集元素 [英] Subset elements in a list based on a logical condition

问题描述

如何根据另一个列表中的条件(真，假)对列表进行子集设置?请，请参见下面的示例:

How can I subset a list based on a condition (TRUE, FALSE) in another list? Please, see my example below:

l <- list(a=c(1,2,3), b=c(4,5,6,5), c=c(3,4,5,6))
l
$a
[1] 1 2 3

$b
[1] 4 5 6 5

$c
[1] 3 4 5 6

cond <- lapply(l, function(x) length(x) > 3)
cond
$a
[1] FALSE

$b
[1] TRUE

$c
[1] TRUE

> l[cond]

l [cond]中的错误:下标类型列表"无效

Error in l[cond] : invalid subscript type 'list'

推荐答案

[需要一个矢量，因此在cond上使用unlist:

[ is expecting a vector, so use unlist on cond:

l[unlist(cond)]
$b
[1] 4 5 6 5

$c
[1] 3 4 5 6

这篇关于基于逻辑条件的列表中的子集元素的文章就介绍到这了，希望我们推荐的答案对大家有所帮助，也希望大家多多支持IT屋！