Considere esse ponto de partida.

# Criando lista de vetores com diferentes comprimentos.
L <- replicate(20, simplify = FALSE, {
    n <- sample(c(10, 15, 20), size = 1)
    runif(n)
})

# Qual o maior comprimento (caso não fosse conhecido a priori).
len <- sapply(L, FUN = length)
nmax <- max(len)

# Selecionando os elementos da lista via vetor lógico.
L[len == nmax]

À disposição.
Walmes.