- R-br - DINF UFPR

Retirar email da lista
by Cristine Tokarski 11 Fev '19

11 Fev '19

Boa tarde, por retirar meu email da lista: cris.tokarski(a)hotmail.com Obrigada Cristine [https://ipmcdn.avast.com/images/icons/icon-envelope-tick-green-avg-v1.png]<http://www.avg.com/email-signature?utm_medium=email&utm_source=link&utm_cam…> Livre de vírus. www.avg.com<http://www.avg.com/email-signature?utm_medium=email&utm_source=link&utm_cam…>.

3 2

Vagas de estágio
by Savano Pereira 11 Fev '19

11 Fev '19

Prezados, Boa tarde. Estou procurando de estagiários de estatística que saibam R e um pouco de sql para trabalhar com segmentação da base de clientes. O local é no Rio de Janeiro - Barra d Tijuca. Interessados podem me encaminhar o CV. Att, --- Savano Pereira TEL: 21 9-8771-9063

1 0

Extração de dados html
by Edimeire Alexandra Pinto 08 Fev '19

08 Fev '19

OI gente. Talvez alguém possa me ajudar na extração de dados web. Objetivo: extrair de cada página a tabela que aparece. Meu problema: Não consigo achar o css certo que me permita colocar o botão "Next" de mudança de página que vem no site da web. Na primeira página tenho de extrair a tabela, depois, no next , mudar a pagina e extrair a segunda tabela que aparece, e assim vai... Não consigo achar o css ou xpath que me possibilite mudar de pagina. Já tentei vários css abaixo: “button.a-Button.a-IRR-button.a-IRR-button—pagination” “li.a-IRR-pagination-item” Segue um resuminho do código que tenho library(rvest)library(xml2) u<-"http://transparencia.pi.gov.br/apex/f?p=101:SERVIDORES::::::" ht<-read_html(u) %>% html_nodes("span.a-Icon.icon-right-chevron") %>% html_nodes("table") %>% html_table()ht ## ou até mesmo esse código ht<-html_session(u) %>% follow_link("span.a-Icon.icon-right-chevron") %>% html_nodes("table") %>% html_table() ## Obrigada!

1 0

Re: [R-br] Reunir bancos com condição.
by verginio＠unesc.net 05 Fev '19

05 Fev '19

Boa tarde, Desculpe o engano, o ultimo caractere no regex deveria ser "$", que é para significar o final do texto. Ex.: lista = grep("arq[13].csv$", list.files() , value = TRUE) Link com o código completo: https://pastebin.com/uVa12Euh Att, Max Verginio <quote author='R-br mailing list'> Bom dia Max, testei e não consegui rodar seu código ontem. Devo fazer algum alteração a mais? Obrigado!!! Diogo JerônimoBacharel em Ciências Estatísticas - ENCE/IBGEMestre em Metrologia - PUC-Rio/PósMQI CONRE: 8514 - SÉRIE _____________________________________ Sent from http://r-br.2285057.n4.nabble.com

2 1

Re: [R-br] Reunir bancos com condição.
by verginio＠unesc.net 05 Fev '19

05 Fev '19

Bom dia Diogo, É possível filtrar a variável "lista" antes de entrar no "lapply", usando "grep". Ex.: #para selecionar "arq1" e "arq3" lista = grep("arq[13].csv&", list.files() , value = TRUE) Att, Max Verginio <quote author='R-br mailing list'> Bom dia lista!!! Seguinte, Criei esse exemplo aqui para ajudar no entendimento da minha dúvida: setwd("C:/Users/diogo/Desktop/testeR") getwd() nomes <- c("Diogo", "Rodrigo", "Isabel", "Marcelo","Sarah")idades <- c(40, 42, 26, 32, 28)tabela1 <- data.frame(nome = nomes, idade = idades)write.csv(tabela1, "arq1.csv", row.names = FALSE) nomes <- c("Antônio", "Letícia", "Cláudio", "Ana Paula","Luiza")idades <- c(50, 26, 40, 25, 32)tabela2 <- data.frame(nome = nomes, idade = idades)write.csv(tabela2, " arq2.csv", row.names = FALSE) nomes <- c("Maria Clara", "Ana Maria", "Bianca", "Lidiane","Anderson")idades <- c(32, 32, 30, 34, 29)tabela3 <- data.frame(nome = nomes, idade = idades)write.csv(tabela3, " arq3.csv", row.names = FALSE) lista=list.files() O comando criou esses arquivos csv de exemplo, onde eles salvam no diretório de trabalho "testeR". Eu reúno esses arquivos por meio dessa função (usei de apoio o dplyr): lista<-list.files()arquivos <- lapply(lista, function(x) read.csv2(x, header=TRUE, sep=";")) dados <- do.call("rbind", arquivos) Se eu aplicar essa função, ela vai reunir todos os arquivos (arq1.arq2 e arq3). Minha dúvida: eu gostaria de aplicá-la, de forma a juntar somente "parte" dos arquivos (ex: arq1 com arq3, por exemplo). Alguém poderia dar uma informação ou ajuda a responder essa dúvida? Obrigado e bom dia!!! Diogo JerônimoBacharel em Ciências Estatísticas - ENCE/IBGEMestre em Metrologia - PUC-Rio/PósMQICONRE: 8514 - SÉRIE AEmail: diogojose21@yahoo.com.brhttp://lattes.cnpq.br/8996149312896520 _______________________________________________ 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. </quote> Quoted from: http://r-br.2285057.n4.nabble.com/R-br-Reunir-bancos-com-condicao-tp4668409… _____________________________________ Sent from http://r-br.2285057.n4.nabble.com

2 1

Re: [R-br] Reunir bancos com condição.
by sznelwar＠uol.com.br 05 Fev '19

05 Fev '19

2 1

Reunir bancos com condição.
by Diogo Jerônimo 04 Fev '19

04 Fev '19

Bom dia lista!!! Seguinte, Criei esse exemplo aqui para ajudar no entendimento da minha dúvida: setwd("C:/Users/diogo/Desktop/testeR") getwd() nomes <- c("Diogo", "Rodrigo", "Isabel", "Marcelo","Sarah")idades <- c(40, 42, 26, 32, 28)tabela1 <- data.frame(nome = nomes, idade = idades)write.csv(tabela1, "arq1.csv", row.names = FALSE) nomes <- c("Antônio", "Letícia", "Cláudio", "Ana Paula","Luiza")idades <- c(50, 26, 40, 25, 32)tabela2 <- data.frame(nome = nomes, idade = idades)write.csv(tabela2, " arq2.csv", row.names = FALSE) nomes <- c("Maria Clara", "Ana Maria", "Bianca", "Lidiane","Anderson")idades <- c(32, 32, 30, 34, 29)tabela3 <- data.frame(nome = nomes, idade = idades)write.csv(tabela3, " arq3.csv", row.names = FALSE) lista=list.files() O comando criou esses arquivos csv de exemplo, onde eles salvam no diretório de trabalho "testeR". Eu reúno esses arquivos por meio dessa função (usei de apoio o dplyr): lista<-list.files()arquivos <- lapply(lista, function(x) read.csv2(x, header=TRUE, sep=";")) dados <- do.call("rbind", arquivos) Se eu aplicar essa função, ela vai reunir todos os arquivos (arq1.arq2 e arq3). Minha dúvida: eu gostaria de aplicá-la, de forma a juntar somente "parte" dos arquivos (ex: arq1 com arq3, por exemplo). Alguém poderia dar uma informação ou ajuda a responder essa dúvida? Obrigado e bom dia!!! Diogo JerônimoBacharel em Ciências Estatísticas - ENCE/IBGEMestre em Metrologia - PUC-Rio/PósMQICONRE: 8514 - SÉRIE AEmail: diogojose21@yahoo.com.brhttp://lattes.cnpq.br/8996149312896520

1 0

Assunto: Digest R-br, volume 98, assunto 1
by Edmar Caldas 01 Fev '19

01 Fev '19

instala o pacote ("plyr" uniao = rbind.fill(arquivo_a, arquivo_b) Enviado do Yahoo Mail no Android <div>Em sex, 1 1e fev 1e 2019 às 12:00, r-br-request(a)listas.c3sl.ufpr.br</div><div><r-br-request(a)listas.c3sl.ufpr.br> escreveu:</div> Enviar submissões para a lista de discussão R-br para r-br(a)listas.c3sl.ufpr.br Para se cadastrar ou descadastrar via WWW, visite o endereço https://listas.inf.ufpr.br/cgi-bin/mailman/listinfo/r-br ou, via email, envie uma mensagem com a palavra 'help' no assunto ou corpo da mensagem para r-br-request(a)listas.c3sl.ufpr.br Você poderá entrar em contato com a pessoa que gerencia a lista pelo endereço r-br-owner(a)listas.c3sl.ufpr.br Quando responder, por favor edite sua linha Assunto assim ela será mais específica que "Re: Contents of R-br digest..." Tópicos de Hoje: 1. Assunto: Re: JUNTAR DOIS ARQUIVOS COM DIMENSÕES DIFERENTES (Edson Lira) ---------------------------------------------------------------------- Message: 1 Date: Thu, 31 Jan 2019 22:19:36 +0000 (UTC) From: Edson Lira <edinhoestat(a)yahoo.com.br> To: a lista Brasileira oficial de discussão do programa R. <r-br(a)listas.c3sl.ufpr.br> Subject: [R-br] Assunto: Re: JUNTAR DOIS ARQUIVOS COM DIMENSÕES DIFERENTES Message-ID: <1661977038.1186878.1548973176805(a)mail.yahoo.com> Content-Type: text/plain; charset="utf-8" Muito obrigado. Enviado do Yahoo Mail no Android <div>Em qua, 30 30e jan 30e 2019 às 22:56, Marcus Nunes por (R-br)</div><div><r-br(a)listas.c3sl.ufpr.br> escreveu:</div> _______________________________________________ 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. -------------- Próxima Parte ---------- Um anexo em HTML foi limpo... URL: <http://listas.inf.ufpr.br/pipermail/r-br/attachments/20190131/bb012f5a/atta…> -------------- Próxima Parte ---------- Um texto embutido e sem conjunto de caracteres especificado foi limpo... Nome: Untitled Url: <http://listas.inf.ufpr.br/pipermail/r-br/attachments/20190131/bb012f5a/atta…> ------------------------------ Subject: Legenda do Digest _______________________________________________ R-br mailing list R-br(a)listas.c3sl.ufpr.br https://listas.inf.ufpr.br/cgi-bin/mailman/listinfo/r-br ------------------------------ Fim da Digest R-br, volume 98, assunto 1 ****************************************

1 0

JUNTAR DOIS ARQUIVOS COM DIMENSÕES DIFERENTES
by Edson Lira 31 Jan '19

31 Jan '19

Boa tarde a todos!!! Tenho dois arquivos: um com os CEP's de pacientes de um hospital (57000 registros) sem as coordenadas, o outro arquivo que consegui no link abixo http://results.openaddresses.io/?runs=all#runs No link acima tem POSTCODES (CEP"S) de todo o mundo. Baixei o do Amazonas que tem o CEP DE MANAUS (SEPAREI ESSE ARQUIVO com 554000 registros) Quero fazer uma rotina aonde eu possa juntar o arquivo de consultas sem as coordenadas com o arquivo de CEP'S com as coordendas. (LAT LON), ou seja, quero fazer um arquivo mantendo a dimensão do arquivo das consultas. Espero ter sido claro. Abaixo o link dos arquivos (um com CEP e o outro com CEP e Coordenadas) https://www.datafilehost.com/d/b93da0f3 https://www.datafilehost.com/d/b8f65984 [ ]'s.Prof. Edson Lira, Me Estatístico Manaus-Amazonas

3 5

Problema para plotar IC para modelo glm Gamma usando stat_smooth() no ggplot2
by ASANTOS 30 Jan '19

30 Jan '19

Prezados Membros do R-br, Estou tentando plotar um modelo glm Gamma com stat_smooth() no ggplot2 sem sucesso. Minha ideia é representar o intervalo de confiança para um modelo onde realizei a junção de dois níveis para o fator Feature. Segundo exemplo fictício do meu problema: #Simulação de um banco de dados, onde a variável resposta Production tem distribuição Gamma set.seed(123) d<-NULL N<-50 d$Production <- rgamma(N,10) d$Feature <- ifelse(d$Production >7 & d$Production<10, c("green"),ifelse(d$Production>11, c("red"), c("blue"))) d$Temp<-rnorm(N,20,5) d<-as.data.frame(d) # # Ajusto um modelo de Gamma completo mG<- glm(Production~ Feature + Temp, family= Gamma, data = d) summary(mG) anova(mG,test="Chi") # Comparo os níveis do fator Feature library(multcomp) PW<-summary(glht(mG, linfct = mcp(Feature= "Tukey"))) PW cld(PW) # Faço de conta que os níveis green = blue e realizo um novo ajuste Feature2<-d$Feature levels(Feature2) levels(Feature2)[1]<-"blue&green" levels(Feature2)[2]<-"blue&green" levels(Feature2) d$Feature2<-Feature2 mG2<- glm(Production~ Feature2 + Temp, family= Gamma, data = d) # Crio os valores de predição pred.data = data.frame( Feature2<-d$Feature2, Temp<-d$Temp ) pred.data$Production = predict(mG2, newdata=pred.data, type="response") #Realizo o plot library("ggplot2") ggplot(d, aes(Temp, Production, colour = Feature2)) + geom_point() + geom_line(data=pred.data) + stat_smooth(method = "glm", formula = y ~ x, family = Gamma) # E tenho uma representação errada do intervalo de confiança do meu modelo mG2 porque não consigo fazer a função stat_smooth() considerar o ajuste mG2. Como posso resolver isso? Obrigado -- ====================================================================== Alexandre dos Santos Proteção Florestal IFMT - Instituto Federal de Educação, Ciência e Tecnologia de Mato Grosso Campus Cáceres Caixa Postal 244 Avenida dos Ramires, s/n Bairro: Distrito Industrial Cáceres - MT CEP: 78.200-000 Fone: (+55) 65 99686-6970 (VIVO) (+55) 65 3221-2674 (FIXO) e-mails:alexandresantosbr@yahoo.com.br alexandre.santos(a)cas.ifmt.edu.br Lattes: http://lattes.cnpq.br/1360403201088680 OrcID: orcid.org/0000-0001-8232-6722 - ResearcherID: A-5790-2016 Researchgate: www.researchgate.net/profile/Alexandre_Santos10 LinkedIn: br.linkedin.com/in/alexandre-dos-santos-87961635 Mendeley:www.mendeley.com/profiles/alexandre-dos-santos6/ ======================================================================

2 2