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. ​