<div dir="ltr"><div class="gmail_default" style="font-family:trebuchet ms,sans-serif">Considere esse ponto de partida.</div><div class="gmail_default"><span style="font-family:monospace,monospace"><br></span></div><div class="gmail_default"><span style="font-family:monospace,monospace"># Criando lista de vetores com diferentes comprimentos.<br>L <- replicate(20, simplify = FALSE, {<br>    n <- sample(c(10, 15, 20), size = 1)<br>    runif(n)<br>})<br><br># Qual o maior comprimento (caso não fosse conhecido a priori).<br>len <- sapply(L, FUN = length)<br>nmax <- max(len)<br><br># Selecionando os elementos da lista via vetor lógico.<br>L[len == nmax]</span></div><div class="gmail_default" style="font-family:trebuchet ms,sans-serif"><br></div><div class="gmail_default" style="font-family:trebuchet ms,sans-serif">À disposição.<br></div><div class="gmail_default" style="font-family:trebuchet ms,sans-serif">Walmes.<br></div>​</div>