Não sei te falar porque não sei  estrutura do endereço dos arquivos no "mega.co.nz". Passa um endereço de um arquivo de texto do seu "mega.co.nz", que eu tento ver. Em tese seria seria substituir o endereço raiz na função.
Daniel


2013/4/11 Mauro Sznelwar <sznelwar@uol.com.br>
Só vale para o Dropbox? Como ficaria no "mega.co.nz", que é o que eu uso? Já usei o datafile host também.
Isso não vai ler o arquivo, mas vai salva-lo no diretório de trabalho:
Talvez alguem possa modificar a função para ler o arquivo na memória.

get.dropbox <- function(file, token) {
         require(RCurl, quietly=TRUE)
         bin <- getBinaryURL(paste0("https://dl.dropboxusercontent.com/u/", token, "/", file),
         ssl.verifypeer = FALSE)
         con <- file(file, open = "wb")
         writeBin(bin, con)
         close(con)
         message(noquote(paste(file, "read into", getwd())))                        
    }

# teste
get.dropbox("descarga.csv", "755659")
# ler na mem
dat.desc1 <- read.delim("descarga.csv",sep=",") 




 

_______________________________________________
R-br mailing list
R-br@listas.c3sl.ufpr.br
https://listas.inf.ufpr.br/cgi-bin/mailman/listinfo/r-br
Leia o guia de postagem (http://www.leg.ufpr.br/r-br-guia) e forneça código mínimo reproduzível.



--
\begin{signature}
Daniel Marcelino
☁ dm.silva@umontreal.ca 
☎ (514) 343 6111 #3799
Skype: d.marcelino 
✎ 3200 Jean Brillant,  Office C5071
Montreal, QC; H3T 1N8
Canada
\end{signature}

"Small steps toward a much better world"