Daniel,

Fiquei curioso para saber o motivo pelo qual eu não consigo mais baixar do
dropbox.

Sua função é uma maneira de contornar o problema.

Obrigado,



Em 11 de abril de 2013 01:18, Daniel Marcelino <[email protected]>escreveu:

>
> 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.
>
_______________________________________________
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.

Responder a