Julho 2016 - R-br - DINF UFPR

Instalação de pacote RCurl no R [Linux 16.04]
by Paulo Henrique Pimenta 11 Jul '16

11 Jul '16

Olá Listeiros, Estou tendo dificuldades para instalar o pacote Rcurl no meu R [usando a IDE RStudio e o Linux Ubuntu 16.04]. Ao fazer a instalação no RStudio recebo a seguinte mensagem: 2016-07-11 12:19:33 (494 KB/s) - “/tmp/RtmpeRnbpy/downloaded_packages/RCurl_1.95-4.8.tar.gz” salvo [916934/916934] * installing *source* package ‘RCurl’ ... ** package ‘RCurl’ successfully unpacked and MD5 sums checked checking for curl-config... no Cannot find curl-config ERROR: configuration failed for package ‘RCurl’ * removing ‘/home/paulo/R/x86_64-pc-linux-gnu-library/3.2/RCurl’ Warning in install.packages : installation of package ‘RCurl’ had non-zero exit status The downloaded source packages are in ‘/tmp/RtmpeRnbpy/downloaded_packages’ > E ao tentar fazer a instação do pacote usando o terminal do Linux [baseado no tutorial: http://www.leg.ufpr.br/~paulojus/embrapa/Rembrapa/Rembrapase36.html] recebo a seguinte mensagem: root@tolstoi:/tmp/RtmpeRnbpy/downloaded_packages# R install RCurl_1.95-4.8.tar.gzARGUMENTO 'install' __ignorado__ARGUMENTO 'RCurl_1.95-4.8.tar.gz' __ignorado__ Espero que vcs possam me ajudar! Um grande abraço a todos. Paulo Henrique de A. S. Pimenta. Graduando em Meteorologia (Bacharelado) - IAG/USP. Fone: +5511981318435.

3 2

Gráficos com boa resolução
by Roberto Guevara 11 Jul '16

11 Jul '16

Prezados e prezadas, estou pesquisando o melhor método para criar figuras no R com resolução adequada, tamanho pequeno e no formato exigido (normalmente por revistas científicas). Venho utilizando a função bitmap com o auxílio do ghostscript. Porém, em algumas ocasiões essa função não funciona, em decorrência do ghostscript, nos computadores de alguns colegas que tento ensinar a função apesar de funcionar bem no meu. Há uma maneira melhor do que a função bitmap? Para salvar figuras em formato TIFF, a função tiff já é o suficiente? Obrigado pela atenção -- Roberto Guevara Ferreira Lima Biólogo - CRBio 6ª Região: 73146/06-D Mestre em Zoologia Laboratório de Ecologia e Zoologia de Vertebrados Instituto de Ciências Biológicas Universidade Federal do Pará Rua Augusto Corrêa, nº 01 - Bairro: Guamá. CEP: 66075-110 Currículo Lattes: http://lattes.cnpq.br/7363382159007600

4 3

Re: [R-br] Baixando dados do INMET com a biblioteca RCurl e bitops/Salvando arquivos em .txt
by Paulo Henrique Pimenta 11 Jul '16

11 Jul '16

Jônatan, Dentro do que eu fiz vc aconselharia e pensaria em modificar o que para melhorar? Um grande abraço! Paulo Henrique de A. S. Pimenta Cel/WhatsApp/Telegram: +5511981318435 Sent from Mail for Windows 10 From: Jônatan<mailto:jdtatsch@gmail.com> Sent: Friday, July 8, 2016 5:27 PM To: Paulo Henrique Pimenta<mailto:paulopimenta6@hotmail.com>; a lista Brasileira oficial de discussão do programa R.<mailto:r-br@listas.c3sl.ufpr.br> Subject: Re: [R-br] Baixando dados do INMET com a biblioteca RCurl e bitops/Salvando arquivos em .txt Nesse link <https://github.com/jdtatsch/inmetr/blob/master/README.md> disponibilizo umas funções que fiz para importar os dados do site do inmet-bdmep para o R. O readme inclui exemplo de uso das funções. O script é baseado no post citado no e-mail Paulo e nas instruções dadas no vídeo <https://www.youtube.com/watch?v=o2fFUw8aSHE>do Meetup R São Paulo (*Web scraping usando o R* por Julio Trecenti). Testado no linux ubuntu somente. Em breve devo empacotar isso. Qualquer problema, me avisem por gentileza. Att. 2016-07-08 13:03 GMT-03:00 Paulo Henrique Pimenta via R-br < r-br(a)listas.c3sl.ufpr.br>: > Olá Listeiros! > > > > Estou com um grande problema e acho que vcs podem me ajudar! Estou usando > um script criado por mim a partir das dicas da própria lista: > http://r-br.2285057.n4.nabble.com/R-br-r-baixando-dados-inmet-td4660459.html > na qual usei o código como template para automatizar o download dos dados > do inmet. Infelizmente estou com alguns problemas, um deles é que só > consigo usar o código no Windows, ou seja, no R do Windows e não do Linux > (possuo o Windows 10 e o Ubuntu 16.04 no meu notebook). > > > > Os erros no meu Linux são referentes a biblioteca RCurl que mesmo > reinstalado várias vezes e usado com a biblioteca bitops continuam a não > funcionar. Outro problema que tenho é o não conhecimento sobre como salvar > os arquivos baixados em um .txt ao invés de alocar em variáveis como estou > fazendo. Caso algum de vcs se interesse em mexer e melhorar o código segue > ele abaixo: > > > > > #################################################################################################################### > > > > ### <begin> > > library(bitops) > > library(RCurl) > > > > #################################################################### > > > > dados_1 <- read.table( > > "E:/inmet/estacoes_2.txt", > > header=F, > > sep="\t") > > > > dados_1 <- data.frame(dados_1) > > > > #names(dados_1) <- c("cidades", "estacoes") > > > > ###################################################################### > > > > # Links para login e dados > > > > myURL1 <- "http://www.inmet.gov.br/projetos/rede/pesquisa/inicio.php" > > > > for (NUM in 1:length(dados_1[,2])){ > > > > myURL2[NUM] <- " > http://www.inmet.gov.br/projetos/rede/pesquisa/gera_serie_txt.php?&mRelEsta…,,,,, > " > > > > # Dados para acesso > > myParams=list( > > mCod="SEU EMAIL", > > mSenha="SUA SENHA", > > btnProcesso = " Acessar ") > > > > myCurl <- getCurlHandle() > > curlSetOpt(cookiejar="cookies.txt", useragent="Mozilla/5.0", > followlocation=TRUE, curl=myCurl) > > > > login <- postForm(myURL1, .params=myParams, curl=myCurl) > > dados[NUM] <- getURLContent(myURL2[NUM], curl=myCurl) > > > > exemplo[NUM] <- head(strwrap(dados[NUM], 70), 10000) > > > > } > > > > ### <end> > > > > > ################################################################################################################### > > > > O arquivo estacoes_2.txt esta aqui: > http://s000.tinyupload.com/?file_id=66921456922777880817 > <http://s000.tinyupload.com/index.php?file_id=66921456922777880817> > > > > Se alguém tiver interesse em modificar para melhorar o código fique a > vontade! > > > > Um grande abraço a todos vcs! > > > > Paulo. > > > > Sent from Mail <https://go.microsoft.com/fwlink/?LinkId=550986> for > Windows 10 > > > > _______________________________________________ > R-br mailing list > R-br(a)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. > -- ############################################################### ## Jônatan Dupont Tatsch ## Professor do Departamento de Física ## Centro de Ciências Exatas e Naturais (CCNE) ## Universidade Federal de Santa Maria - UFSM ## Faixa de Camobi, Prédio 13 - Campus UFSM - Santa Maria, RS, Brasil - 97105-900 ## Telefone: +55(55)33012083 ## www.ufsm.br/meteorologia ###############################################################

2 1

Tamanho de Gráficos
by Pedro Campelo 11 Jul '16

11 Jul '16

Pessoal, Qual as medidas do box e margens que vocês mais utilizam para artigos, hein? Não consigo achar uma proporção boa. Obrigado

2 1

Erro na instalação de pacotes do Linux para o Win 7
by Elias Carvalho 10 Jul '16

10 Jul '16

Ola Pessoal Eu estou criando um pacote no Ubuntu com o RStudio, gerei seu tar.gz e tentei instalar no RStudio do Windows como teste, porém ao abrir o tar.gz e solicitar a instalação, a mensagem abaixo aparece, porém nada mais acontece e o pacote novo não é instalado. *The downloaded binary packages are in C:\Users\Administrador\AppData\Local\Temp\RtmpQvISF6\downloaded_packages > install.packages("E:/nome_Pacote_1.0_R_x86_64-pc-linux-gnu.tar.gz", repos = NULL, type = "source") * Existe alguma coisa a se fazer para gerar um arquivo de instalação do pacote no Linux para o Windows? Tem como ver algum status dessa instalação no RStudio ? Obrigado -- Best regards... 8^) “The mind that is open to new ideas never come back to its original size” *Albert Einstein* -- Obrigado Elias

1 0

Problema com loopings
by Paulo Henrique Pimenta 09 Jul '16

09 Jul '16

Olá listeiros. Estou com um problema em loopings, pois quando tento fazer um processo iterativo em uma URL não consigo fazer com novos valores sejam colocados no endereço. Abaixo segue parte do meu código: for (NUM in 1:length(dados_1[,2])){ myURL2[NUM] <- "http://www.inmet.gov.br/projetos/rede/pesquisa/gera_serie_txt.php?&mRelEsta…"dados_1[,2][NUM]"&btnProcesso=serie&mRelDtInicio=01/01/2002&mRelDtFim=01/01/2013&mAtributos=1,,,,1,1,,1,1,,,1,,,,," No qual o campo destacado é aquele que deve ser modificado a partir de sucessivas iterações. A minha primeira ideia foi colocar aspas duas até o campo destacado e depois dele, mas infelizmente não dá certo. Se alguém puder me ajudar fico muito agradecido! Um grande abraço a todos!! Paulo Henrique de A. S. Pimenta Cel/WhatsApp/Telegram: +5511981318435 Sent from Mail for Windows 10

2 1

Re: [R-br] Baixando dados do INMET com a biblioteca RCurl e bitops/Salvando arquivos em .txt
by paulopimenta6＠hotmail.com 09 Jul '16

09 Jul '16

Olá Alisson, Como faço para abrir arquivos ipynb? Não conheço esses formatos de arquivos e os tutoriais online não explicavam muito bem como abrir. Poderia me ajudar explicando com executar esses arquivos? Um abraço. Paulo. <quote author='R-br mailing list'> Paulo, usa o python para fazer esse dowload desse dados, o R não funciona muito bem. Att., Alisson 2016-07-08 12:21 GMT-03:00 R-br mailing list [via R-br] < ml-node+s2285057n4666378h54(a)n4.nabble.com>: > Olá Listeiros! > > > > Estou com um grande problema e acho que vcs podem me ajudar! Estou usando > um script criado por mim a partir das dicas da própria lista: > http://r-br.2285057.n4.nabble.com/R-br-r-baixando-dados-inmet-td4660459.html > na qual usei o código como template para automatizar o download dos dados > do inmet. Infelizmente estou com alguns problemas, um deles é que só > consigo usar o código no Windows, ou seja, no R do Windows e não do Linux > (possuo o Windows 10 e o Ubuntu 16.04 no meu notebook). > > > > Os erros no meu Linux são referentes a biblioteca RCurl que mesmo > reinstalado várias vezes e usado com a biblioteca bitops continuam a não > funcionar. Outro problema que tenho é o não conhecimento sobre como salvar > os arquivos baixados em um .txt ao invés de alocar em variáveis como estou > fazendo. Caso algum de vcs se interesse em mexer e melhorar o código segue > ele abaixo: > > > > > #################################################################################################################### > > > > ### <begin> > > library(bitops) > > library(RCurl) > > > > #################################################################### > > > > dados_1 <- read.table( > > "E:/inmet/estacoes_2.txt", > > header=F, > > sep="\t") > > > > dados_1 <- data.frame(dados_1) > > > > #names(dados_1) <- c("cidades", "estacoes") > > > > ###################################################################### > > > > # Links para login e dados > > > > myURL1 <- "http://www.inmet.gov.br/projetos/rede/pesquisa/inicio.php" > > > > for (NUM in 1:length(dados_1[,2])){ > > > > myURL2[NUM] <- " > http://www.inmet.gov.br/projetos/rede/pesquisa/gera_serie_txt.php?&mRelEsta…,,,,, > " > > > > # Dados para acesso > > myParams=list( > > mCod="SEU EMAIL", > > mSenha="SUA SENHA", > > btnProcesso = " Acessar ") > > > > myCurl <- getCurlHandle() > > curlSetOpt(cookiejar="cookies.txt", useragent="Mozilla/5.0", > followlocation=TRUE, curl=myCurl) > > > > login <- postForm(myURL1, .params=myParams, curl=myCurl) > > dados[NUM] <- getURLContent(myURL2[NUM], curl=myCurl) > > > > exemplo[NUM] <- head(strwrap(dados[NUM], 70), 10000) > > > > } > > > > ### <end> > > > > > ################################################################################################################### > > > > O arquivo estacoes_2.txt esta aqui: > http://s000.tinyupload.com/?file_id=66921456922777880817 > <http://s000.tinyupload.com/index.php?file_id=66921456922777880817> > > > > Se alguém tiver interesse em modificar para melhorar o código fique a > vontade! > > > > Um grande abraço a todos vcs! > > > > Paulo. > > > > Sent from Mail <https://go.microsoft.com/fwlink/?LinkId=550986> for > Windows 10 > > > > _______________________________________________ > R-br mailing list > [hidden email] <http:///user/SendEmail.jtp?type=node&node=4666378&i=0> > 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. > > ------------------------------ > If you reply to this email, your message will be added to the discussion > below: > > http://r-br.2285057.n4.nabble.com/R-br-Baixando-dados-do-INMET-com-a-biblio… > To unsubscribe from R-br, click here > <http://r-br.2285057.n4.nabble.com/template/NamlServlet.jtp?macro=unsubscrib…> > . > NAML > <http://r-br.2285057.n4.nabble.com/template/NamlServlet.jtp?macro=macro_view…> > -- Alisson Lucrecio da Costa _______________________________________________ R-br mailing list R-br(a)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. Inmet download date mensal MG.ipynb (8K) <http://r-br.2285057.n4.nabble.com/attachment/4666379/0/Inmet%20download%20d…> Inmet download date MG.ipynb (19K) <http://r-br.2285057.n4.nabble.com/attachment/4666379/1/Inmet%20download%20d…> </quote> Quoted from: http://r-br.2285057.n4.nabble.com/R-br-Baixando-dados-do-INMET-com-a-biblio… _____________________________________ Sent from http://r-br.2285057.n4.nabble.com

2 1

Re: [R-br] Baixando dados do INMET com a biblioteca RCurl e bitops/Salvando arquivos em .txt
by Paulo Henrique Pimenta 08 Jul '16

08 Jul '16

Olá Jônatan, Que bom poder receber sua ajuda! Lembro de vc, pois vc trabalhou no laboratório do professor Humberto no IAG-USP. Sou estagiário do MASTER. Li e irei testar o código em meu Linux. Após o teste irei escrever sobre a minha experiência e dúvidas. Um grande abraço Sent from Mail<https://go.microsoft.com/fwlink/?LinkId=550986> for Windows 10 From: Jônatan<mailto:jdtatsch@gmail.com> Sent: Friday, July 8, 2016 5:27 PM To: Paulo Henrique Pimenta<mailto:paulopimenta6@hotmail.com>; a lista Brasileira oficial de discussão do programa R.<mailto:r-br@listas.c3sl.ufpr.br> Subject: Re: [R-br] Baixando dados do INMET com a biblioteca RCurl e bitops/Salvando arquivos em .txt Nesse link <https://github.com/jdtatsch/inmetr/blob/master/README.md> disponibilizo umas funções que fiz para importar os dados do site do inmet-bdmep para o R. O readme inclui exemplo de uso das funções. O script é baseado no post citado no e-mail Paulo e nas instruções dadas no vídeo <https://www.youtube.com/watch?v=o2fFUw8aSHE>do Meetup R São Paulo (*Web scraping usando o R* por Julio Trecenti). Testado no linux ubuntu somente. Em breve devo empacotar isso. Qualquer problema, me avisem por gentileza. Att. 2016-07-08 13:03 GMT-03:00 Paulo Henrique Pimenta via R-br < r-br(a)listas.c3sl.ufpr.br>: > Olá Listeiros! > > > > Estou com um grande problema e acho que vcs podem me ajudar! Estou usando > um script criado por mim a partir das dicas da própria lista: > http://r-br.2285057.n4.nabble.com/R-br-r-baixando-dados-inmet-td4660459.html > na qual usei o código como template para automatizar o download dos dados > do inmet. Infelizmente estou com alguns problemas, um deles é que só > consigo usar o código no Windows, ou seja, no R do Windows e não do Linux > (possuo o Windows 10 e o Ubuntu 16.04 no meu notebook). > > > > Os erros no meu Linux são referentes a biblioteca RCurl que mesmo > reinstalado várias vezes e usado com a biblioteca bitops continuam a não > funcionar. Outro problema que tenho é o não conhecimento sobre como salvar > os arquivos baixados em um .txt ao invés de alocar em variáveis como estou > fazendo. Caso algum de vcs se interesse em mexer e melhorar o código segue > ele abaixo: > > > > > #################################################################################################################### > > > > ### <begin> > > library(bitops) > > library(RCurl) > > > > #################################################################### > > > > dados_1 <- read.table( > > "E:/inmet/estacoes_2.txt", > > header=F, > > sep="\t") > > > > dados_1 <- data.frame(dados_1) > > > > #names(dados_1) <- c("cidades", "estacoes") > > > > ###################################################################### > > > > # Links para login e dados > > > > myURL1 <- "http://www.inmet.gov.br/projetos/rede/pesquisa/inicio.php" > > > > for (NUM in 1:length(dados_1[,2])){ > > > > myURL2[NUM] <- " > http://www.inmet.gov.br/projetos/rede/pesquisa/gera_serie_txt.php?&mRelEsta…,,,,, > " > > > > # Dados para acesso > > myParams=list( > > mCod="SEU EMAIL", > > mSenha="SUA SENHA", > > btnProcesso = " Acessar ") > > > > myCurl <- getCurlHandle() > > curlSetOpt(cookiejar="cookies.txt", useragent="Mozilla/5.0", > followlocation=TRUE, curl=myCurl) > > > > login <- postForm(myURL1, .params=myParams, curl=myCurl) > > dados[NUM] <- getURLContent(myURL2[NUM], curl=myCurl) > > > > exemplo[NUM] <- head(strwrap(dados[NUM], 70), 10000) > > > > } > > > > ### <end> > > > > > ################################################################################################################### > > > > O arquivo estacoes_2.txt esta aqui: > http://s000.tinyupload.com/?file_id=66921456922777880817 > <http://s000.tinyupload.com/index.php?file_id=66921456922777880817> > > > > Se alguém tiver interesse em modificar para melhorar o código fique a > vontade! > > > > Um grande abraço a todos vcs! > > > > Paulo. > > > > Sent from Mail <https://go.microsoft.com/fwlink/?LinkId=550986> for > Windows 10 > > > > _______________________________________________ > R-br mailing list > R-br(a)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. > -- ############################################################### ## Jônatan Dupont Tatsch ## Professor do Departamento de Física ## Centro de Ciências Exatas e Naturais (CCNE) ## Universidade Federal de Santa Maria - UFSM ## Faixa de Camobi, Prédio 13 - Campus UFSM - Santa Maria, RS, Brasil - 97105-900 ## Telefone: +55(55)33012083 ## www.ufsm.br/meteorologia ###############################################################

1 0

Encontro do Grupo de Usuários de R do Rio Grande do Sul (UseRS)
by Cristofer Weber 08 Jul '16

08 Jul '16

Para quem estiver por Porto Alegre no final do mês! Prezados, convido a todos a participarem do próximo encontro do UseRS - Grupo de Usuários de R do Rio Grande do Sul. Este encontro ocorrerá no dia 27 de julho a partir das 9h, e será um evento satélite do 22° SINAPE, em Porto Alegre. Para participar do Meetup UseRS não será necessária a inscrição no SINAPE. Maiores detalhes em http://www.meetup.com/pt-BR/UseRS_/ []'s Cristofer c) Evento Satélite - Meetup UseRS Data: 27 de julho de 2016 Horário: 9h 9:00 - 10:00 ShowR João Batista Gonçalves de Brito Especialista em Métodos Quantitativos - FAMAT-PUCRS R é uma ferramenta gratuita, com origem na ambiência da ciência estatística, que tem alçado proeminência nas mais diversas áreas de conhecimento. O seu uso é facilmente extensível por meio de pacotes e a sua linguagem conta com uma vibrante comunidade de colaboradores, a qual contribui ativamente para agregar novos recursos. Com o objetivo de explorar sua diversidade, a apresentação narra uma história - como pano de fundo - para demonstrar a pluralidade de aplicações desta fantástica linguagem de programação. 10:30 - 11:30 Startup Indexer Filipe Jaeger Zabala Mestre em Estatística - IME-USP Resumo: O Startup Indexer é um índice para classificação de Novos Projetos, criado em RStudio. É baseado em princípios ordenados por prioridade. Cada princípio possui uma ordem equivalente à sua pontuação. UseRS têm sua pontuação homologada online nos itens de Comprometimento e Valoração. 14:00 - 15:00 Estimação do valor futuro de cada cliente Rodrigo Heldt Silveira Mestre em Marketing - EA-UFRGS A capacidade de o marketing mensurar e comunicar o valor de suas atividades e investimentos tem sido uma das prioridades de pesquisa na área nos últimos anos. Para atingir esse objetivo, a capacidade de mensurar adequadamente os ativos de marketing, como o Customer Lifetime Value e, de forma agregada, o Customer Equity, torna-se essencial, pois esses ativos são considerados os elementos capazes de traduzir em valores monetários o resultado dos diversos investimentos realizados pela área de marketing. Diante da mensuração desses valores, é possível o planejamento e a realização de ações mais precisas por parte dos profissionais de marketing. Assim, o estudo que será apresentado trará a aplicação em R de um modelo de estimação de Customer Lifetime Value no modo bottom-up (individual por cliente) em uma amostra de clientes de uma empresa do setor de serviços financeiros. O modelo bayesiano hierárquico aplicado, com três regressões estruturadas conforme o modelo Seemingly Unrelated Regressions (SUR) (ZELNER, 1971), foi construído a partir dos trabalhos de Kumar et al.(2008), Kumar e Shah (2009) e Cowles, Carlin e Connet (1996). 15:00 - 16:00 Gestão do portfólio de clientes Cleo Schmitt Silveira Doutora em Marketing - EA-UFRGS A gestão de clientes é um processo que envolve a tomada de decisões estratégicas, que influenciam a composição do portfólio de clientes da companhia, e operacionais, que afetam o relacionamento dos clientes com a empresa no dia a dia. Apresentaremos um framework em R que propicia a integração dessas duas perspectivas e permite aos gestores alocarem melhor os recursos de marketing, por possibilitar (a) o incremento da eficiência da carteira de clientes, a partir da sua otimização, e (b) a identificação dos clientes mais propensos a gerarem lucros futuros, com base na modelagem de customer lifetime value (CLV) sugerida. O framework de gestão de clientes inclui a avaliação do risco e possibilita aos gestores uma visão holística do negócio e particular de cada cliente. 16:30 - 17:30 Novidades apresentadas no The R User Conference 2016 Cristofer Weber Mestre em Ciência da Computação - PPGCC-PUCRS e Data Scientist @ NeoGrid Assuntos que serão cobertos: * Ensembles (Random Forest, Gradient Boosting) * Computação de Alto Desempenho & Big Data * Tidy Data (universo de packages desenvolvidas por Hadley Wickham) * Ferramentas para avaliação de desempenho de código em R * Comunidade R This e-mail message, including any attachments, is for the sole use of the person to whom it has been sent and may contain information that is confidential or legally protected. If you are not the intended recipient or have received this message in error, you are not authorized to copy, distribute, or otherwise use it or its attachments. Please notify the sender immediately by return email and permanently delete this message and any attachments. NeoGrid makes no warranty that this email is error or virus free. NeoGrid Europe Limited is a company registered in the United Kingdom with the registration number 7717968. The registered office is 8-10 Upper Marlborough Road, St Albans AL1 3UR, Hertfordshire, UK. NeoGrid Netherlands B.V. is a company registered in the Netherlands with the registration number 3416.6499 and registered office at Science Park 400, 1098 XH Amsterdam, NL. NeoGrid North America Limited is a company registered in the United States with the registration number 52-2242825. The registered office is 55 West Monroe Street, Suite 3590-60603, Chicago, IL, USA. NeoGrid Japan is located at New Otani Garden Court 7F, 4-1 Kioi-cho, Chiyoda-ku, Tokyo 102-0094, Japan. NeoGrid Software SA is a company registered in Brazil, with the registration number CNPJ: 03.553.145/0001-08 and located at Av. Santos Dumont, 935, 89.218-105, Joinville - SC - Brazil. Esta mensagem pode conter informação confidencial ou privilegiada, sendo seu sigilo protegido por lei. Se você não for o destinatário ou a pessoa autorizada a receber esta mensagem, não pode usar, copiar ou divulgar as informações nela contidas ou tomar qualquer ação baseada nessas informações. Se você recebeu esta mensagem por engano, por favor, avise imediatamente ao remetente, respondendo o e-mail e em seguida apague-a. Agradecemos sua cooperação.

1 0

Baixando dados do INMET com a biblioteca RCurl e bitops/Salvando arquivos em .txt
by Paulo Henrique Pimenta 08 Jul '16

08 Jul '16

Olá Listeiros! Estou com um grande problema e acho que vcs podem me ajudar! Estou usando um script criado por mim a partir das dicas da própria lista: http://r-br.2285057.n4.nabble.com/R-br-r-baixando-dados-inmet-td4660459.html na qual usei o código como template para automatizar o download dos dados do inmet. Infelizmente estou com alguns problemas, um deles é que só consigo usar o código no Windows, ou seja, no R do Windows e não do Linux (possuo o Windows 10 e o Ubuntu 16.04 no meu notebook). Os erros no meu Linux são referentes a biblioteca RCurl que mesmo reinstalado várias vezes e usado com a biblioteca bitops continuam a não funcionar. Outro problema que tenho é o não conhecimento sobre como salvar os arquivos baixados em um .txt ao invés de alocar em variáveis como estou fazendo. Caso algum de vcs se interesse em mexer e melhorar o código segue ele abaixo: #################################################################################################################### ### <begin> library(bitops) library(RCurl) #################################################################### dados_1 <- read.table( "E:/inmet/estacoes_2.txt", header=F, sep="\t") dados_1 <- data.frame(dados_1) #names(dados_1) <- c("cidades", "estacoes") ###################################################################### # Links para login e dados myURL1 <- "http://www.inmet.gov.br/projetos/rede/pesquisa/inicio.php" for (NUM in 1:length(dados_1[,2])){ myURL2[NUM] <- "http://www.inmet.gov.br/projetos/rede/pesquisa/gera_serie_txt.php?&mRelEsta…,,,,," # Dados para acesso myParams=list( mCod="SEU EMAIL", mSenha="SUA SENHA", btnProcesso = " Acessar ") myCurl <- getCurlHandle() curlSetOpt(cookiejar="cookies.txt", useragent="Mozilla/5.0", followlocation=TRUE, curl=myCurl) login <- postForm(myURL1, .params=myParams, curl=myCurl) dados[NUM] <- getURLContent(myURL2[NUM], curl=myCurl) exemplo[NUM] <- head(strwrap(dados[NUM], 70), 10000) } ### <end> ################################################################################################################### O arquivo estacoes_2.txt esta aqui: http://s000.tinyupload.com/?file_id=66921456922777880817 Se alguém tiver interesse em modificar para melhorar o código fique a vontade! Um grande abraço a todos vcs! Paulo. Sent from Mail for Windows 10

3 2