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.
# é preciso instalar o pacote RCurl antes
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<http://dl.dropbox.com/u/755659/descarga.csv>
",sep=",")
2013/4/10 Antonio Silva <[email protected]>
> Olá a todos,
>
> Estou com problemas para recuperar dados da web.
>
> Por exemplo, eu utilizava o comando
>
> dat.desc1 <- read.delim("http://dl.dropbox.com/u/755659/descarga.csv
> ",sep=",")
>
> para baixar dados que tenho em uma pasta pública no dropbox.
>
> Depois de uns meses sem utilizar o recurso fui tentar e recebi a mensagem
>
> Erro em file(file, "rt") : não é possível abrir a conexão
>
> Outros exemplos que peguei na internet como
>
> read.table("
> http://archive.ics.uci.edu/ml/machine-learning-databases/wine/wine.data
> ",sep=",")
>
> Funcionam normalmente.
>
> Alguém já teve este problema? Há como contornar?
>
> Obrigado,
>
> Antônio Olinto
>
> _______________________________________________
> R-br mailing list
> [email protected]
> 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
☁ [email protected]
☎ (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"
_______________________________________________
R-br mailing list
[email protected]
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.
