Fantástico Éder!!!

Essa função elide() resolveu um bocado de problemas meus,

Muito obrigado,

-- 
======================================================================
Alexandre dos Santos
Proteção Florestal 
IFMT - Instituto Federal de Educação, Ciência e Tecnologia de Mato Grosso
Campus Cáceres
Caixa Postal 244
Avenida dos Ramires, s/n
Bairro: Distrito Industrial 
Cáceres - MT                      CEP: 78.200-000
Fone: (+55) 65 8132-8112 (TIM)   (+55) 65 9686-6970 (VIVO)
e-mails:alexandresantosbr@yahoo.com.br 
        alexandre.santos@cas.ifmt.edu.br 
Lattes: http://lattes.cnpq.br/1360403201088680                   
======================================================================

Em 30/04/2014 05:57, Éder Comunello escreveu:

if (sum(sapply(basename(links), file.exists))<3) {

lapply(links, function(a) tryCatch(download.file(a, dest=basename(a), mode='wb'),

error=function(...) message("ERRO!")))} else message('OK!')