> > if (dados$len == 1){ A sua solucao nao funciona porque essa condicao tem comprimento igual ao tamanho de dados$len, mas if() precisa de TRUE ou FALSE (tamanho 1).