Подмножество элементов в списке на основе логического условия

Как я могу подгруппировать список на основе условия (ИСТИНА, ЛОЖЬ) в другом списке? Пожалуйста, посмотрите мой пример ниже:

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]: недопустимый индекс типа 'list'