
Senhores, bom dia! Vou passar minha impressão como usuário Windows. O que pude notar em relação ao Dropbox é que ele passou a forçar o uso do protocolo 'https' e isso trás implicações para usuários Windows que são ligeiramente diferentes para usuários Linux e Mac. Utilizo R version 3.1.0 (2014-04-10) - Platform: x86_64-w64-mingw32/x64 (64-bit), e ainda nessa versão os links seguros precisam ser acessados pelo R utilizando internet2.dll. Quem acompanhou a discussão sobre configuração de proxy, pode entender que isso pode dar uma certa dor de cabeça. O fato é que uma vez que você estabelece setInternet2(TRUE), o source() funciona. Segue código abaixo. Outra nota é que contas novas do Dropbox não dão mais direito à pastas públicas, a não ser que você opte pelo pacote PRO. Nesse caso deve-se usar a segunda forma do código que segue. ### <code r> ############################################################################### ### Duas formas de referenciar o mesmo arquivo em uma pasta pública do Dropbox ############################################################################### URL1 <- 'https://dl.dropboxusercontent.com/u/117618178/aac.R' ### Copy public link... URL2 <- 'https://www.dropbox.com/s/qaqp8phnswqeeem/aac.R' ### Share : Get link ### A segunda forma precisa ter o link editado e é o mesmo procedimento ### utilizado quando você não tem uma pasta pública. URL2a <- gsub("^.*/s/", "http://dl.dropbox.com/s/", URL2) ### Notei que o Dropbox passou a "forçar" o uso do protocolo 'https' apesar de ### permitir o link com 'http' ############################################################################### ### Tentativa de uso do source() ############################################################################### source(URL1) # Error in file(filename, "r", encoding = encoding) : # cannot open the connection # In addition: Warning message: # In file(filename, "r", encoding = encoding) : unsupported URL scheme source(URL2a) # Error in file(filename, "r", encoding = encoding) : # cannot open the connection ### Apesar dos erros acima, o arquivo pode ser acessado com browseURL() se seu navegador é o Internet Explorer ou utiliza internet2.dll. # browseURL(URL1) # browseURL(URL2a) ############################################################################### ### Uso de internet2.dll no R ############################################################################### setInternet2(NA) # [1] FALSE ### O padrão no Windows é estar desativado no R Console e ativo no RStudio. ### Ativando internet2.dll ### Caso inicie antes de tentar acessar a web, não aparecerá o aviso abaixo ('warning') setInternet2(TRUE) # In setInternet2(TRUE) : internet routines were already initialized ### Nova tentativa de uso do source() desta vez usando internet2.dll source(URL1) ls() # [1] "aac" "URL1" "URL2" "URL2a" ### Sucesso! rm(aac) source(URL2a) ls() # [1] "aac" "URL1" "URL2" "URL2a" ### Sucesso! ### </code> Éder Comunello <c <comunello.eder@gmail.com>omunello.eder@gmail.com> Dourados, MS - [22 16.5'S, 54 49'W]