Outubro 2018 - R-br

grep e gsub: substituição de linhas
by Elerson 17 Out '18

17 Out '18

Prezados, Tendo criar mais uma coluna em data. data$Var2 <- ifelse(grepl("BARREIRO|CENTRO-SUL|LESTE|NORDESTE|NOROESTE|NORTE|OESTE|PAMPULHA|VENDA NOVA|RMBH|MG|SEM INFORMACAO", data$Var1, ignore.case = TRUE), gsub(".*(BARREIRO|CENTRO-SUL|LESTE|NORDESTE|NOROESTE|NORTE|OESTE|PAMPULHA|VENDA NOVA|RMBH|MG|SEM INFORMACAO).*", "\\1",data$Var1), "OUTRO ESTADO") NOROESTE acaba sendo excluído de Var2, sendo substituído por OESTE. Não quero que isso aconteça. Penso seja por conta do "OESTE" nele contido, já que existe outra palavra OESTE. O restante está exatamente como eu quero. Abaixo, exemplo de como está ficando. Desde já agradeço. *Var1* *Freq* *Var2* SEM INFORMACAO 0,38 SEM INFORMACAO SEM INFORMACAO 0 SEM INFORMACAO BARREIRO 9 BARREIRO CENTRO-SUL 22,18 CENTRO-SUL CIDADE DE CANDEIAS/MG 0 MG CIDADE DE CORONEL FABRICIANO/MG 0 MG CIDADE DE ITABIRA/MG 0 MG CIDADE DE ITABIRITO/MG 0,13 MG GOVERNADOR VALADARES/MG 0 MG LESTE 5,83 LESTE NORDESTE 9,25 NORDESTE NOROESTE 13,05 OESTE NORTE 8,11 NORTE OESTE 7,48 OESTE PAMPULHA 8,87 PAMPULHA RMBH/BETIM 0 RMBH RMBH/BRUMADINHO 0 RMBH RMBH/CONTAGEM 1,01 RMBH RMBH/ESMERALDAS 0 RMBH SEM INFORMACAO 0,89 SEM INFORMACAO VENDA NOVA 13,31 VENDA NOVA

1 0

Re: [R-br] Digest R-br, volume 94, assunto 9
by Wilson Cohen 13 Out '18

13 Out '18

oi Thallita Você chegou até aqui? > summary(resultado) Error: factor(paisagem) Df Sum Sq Mean Sq ambiente 1 4871 4871 Error: Within Df Sum Sq Mean Sq F value Pr(>F) rede 1 1432 1432 0.236 0.639 ambiente 1 16179 16179 2.662 0.137 sensibilidade 1 2471 2471 0.406 0.540 Residuals 9 54706 6078 Em sex, 12 de out de 2018 às 12:00, <r-br-request(a)listas.c3sl.ufpr.br> escreveu: > 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. Anova fatorial com medidas repetidas (e aninhamento?) > (Thallita Grande) > > > ---------------------------------------------------------------------- > > Message: 1 > Date: Fri, 12 Oct 2018 01:22:42 +0000 > From: Thallita Grande <tata9go(a)hotmail.com> > To: "r-br(a)listas.c3sl.ufpr.br" <r-br(a)listas.c3sl.ufpr.br> > Subject: [R-br] Anova fatorial com medidas repetidas (e aninhamento?) > Message-ID: > < > DM5PR15MB1659FB0E789FDBAEC3BE7C57FEE20(a)DM5PR15MB1659.namprd15.prod.outlook.com > > > > Content-Type: text/plain; charset="iso-8859-1" > > Olá pessoal. > > > Desejo comparar a variável "PC" (variável dependente contínua) entre 3 > fatores (variáveis independentes categóricas: rede, ambiente e > sensibilidade). > > > Como tenho mais de uma medida para a mesma paisagem, creio que devo fazer > uma ANOVA fatorial com medidas repetidas. No entanto, creio que haja um > aninhamento entre os níveis da variável "sensibilidade", pois o tipo > "sensível" é sempre um subconjunto do tipo "tolerante" (está contido em). > > > Como considero esse aninhamento no teste? > > > Por enquanto, meu código é: > > > resultado=aov(PC ~ rede + ambiente + sensibilidade + > Error(factor(paisagem))) > > > > paisagem PC rede ambiente sensibilidade > 35 238.00 Sim florestal sensivel > 35 247.00 Sim florestal tolerante > 35 6.76 Sim savanico tolerante > 35 228.00 Não florestal sensivel > 35 228.00 Não florestal tolerante > 35 5.15 Não savanico tolerante > 36 113.00 Sim florestal sensivel > 36 123.00 Sim florestal tolerante > 36 144.00 Sim savanico sensivel > 36 160.00 Sim savanico tolerante > 36 87.50 Não florestal sensivel > 36 87.50 Não florestal tolerante > 36 127.00 Não savanico sensivel > 36 127.00 Não savanico tolerante > > > > > Obrigada. > > ----------------------------- > Thallita Grande, M.Sc. > Doutorado em Ecologia > Instituto de Ciencias Biologicas > Universidade de Brasilia - Campus Darcy Ribeiro > Skype: thallita.grande > CRBio 080256/04-D > -------------- Próxima Parte ---------- > Um anexo em HTML foi limpo... > URL: < > http://listas.inf.ufpr.br/pipermail/r-br/attachments/20181012/8c3e0e75/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 94, assunto 9 > **************************************** > -- *Prof. MSc. Wilson Martins da Silva* *Mestre em Ecologia Aquática e Pesca - PPGEAP/ICB/UFPA* *Especialista em Biodiversidade Amazônica - UFPA/ATMDepto de Morfologia e Ciências Fisiológicas* *Centro de Ciências Biológicas e da Saúde* *Universidade do Estado do Pará* *Campus IX - Altamira - Pará* http://lattes.cnpq.br/2440617911389759 wilsoncelula(a)gmail.com, wilsoncelula(a)hotmail.com <wilsonms(a)ufpa.br>

1 0

Transcrição de vídeos para textos!
by Andre Oliveira 12 Out '18

12 Out '18

Boa tarde! Tenho algumas entrevistas e preciso fazer uma nuvem de palavras sobre tais entrevistas. Tem algum pacote do R que faça as transcrições do áudio dos vídeos para texto? Grato

3 2

dois gradientes de cores no ggplot2
by Priscila Lemes 10 Out '18

10 Out '18

Olá lista! Alguém saberia como incluir dois gradientes de cores no mesmo conjunto de dados? No ggplot? Tentei dividir o conjunto de dados, mas não rolou. meu codigo foi: > dat1 change values 1 -10 0.00 2 -9 0.50 3 -8 0.20 4 -7 0.30 5 -6 0.00 6 -5 0.00 7 -4 0.61 8 -3 0.40 9 -2 1.00 10 -1 0.80 > dat2 change values 1 5 0.61 2 3 1.00 3 10 0.50 4 2 0.00 5 7 0.00 6 6 0.50 7 8 0.00 8 10 0.30 9 6 0.61 10 6 0.20 p = ggplot() + xlim(-10, 10) + ylim(0,1) + labs(x= "change", y= "values")+ geom_point(data=dat1, aes(x=change, y=value, color=value), shape=19, size=3, alpha=0.5)+ scale_color_gradientn(colours=c("#FC4013","#FED246")) p1 = p+geom_point(data=dat2, aes( x=change, y=value, color=value), shape=19, size=3, alpha=0.5)+ scale_color_gradientn(colours=c("#5CB0FD","#4DE775")) + theme(axis.text.x = element_text(size=18,colour='grey8'), axis.text.y = element_text(size=18,colour='grey8'), axis.title.x = element_text(size=18,colour='grey8'), axis.title.y = element_text(size=20,colour='grey8'), strip.text.x = element_text(size=18,colour='grey8'), strip.background = element_rect(fill="transparent"), legend.position="none", legend.text=element_blank(), legend.title=element_blank(), legend.background = element_rect(fill="grey98", size=1, linetype="solid"), panel.background=element_rect("grey98")) p1 + geom_vline(xintercept = 0,colour="grey68",linetype='twodash', size=2)+ geom_hline(yintercept = 0.5, colour="grey78") -- *Priscila Lemes, * *PhD in Ecology and Evolution* *- UFG* <http://www.wix.com/rdloyola/lab> Post Doctoral, Department of Zoology, IB, UNESP - Rio Claro - São Paulo - Brazil http://lattes.cnpq.br/7228776843625214 Skype: plemes_

1 0

Exportando objeto tipo table para Word usando officer
by Jobenil Luiz Magalhães Júnior 09 Out '18

09 Out '18

Prezados(as) Criei um objeto tipo "table" usando xtabs e estou tentando exportá-lo no mesmo formato para Word usando officer. > tp filiais q01 f1 f2 f3 f4 f5 f6 f7 f8 Total Sim 19.2 21.8 11.8 11.3 20.6 25.0 30.0 16.3 19.1 Não 80.8 78.2 88.2 88.7 79.4 75.0 70.0 83.7 80.9 Total 100.0 100.0 100.0 100.0 100.0 100.0 100.0 100.0 100.0 Estou usando os seguintes comandos doc <- doc %>% body_add_par("Você exerce função de chefia?", style = "heading 1") %>% body_add_table(as.data.frame(tp), style = "Table Professional", header = FALSE) print(doc, target = "teste.docx") O "officer" me obriga a transformar o objeto tp em dataframe e como resultado a tabela fica desconfigurada. Desejo manter o mesmo formato do objeto tp no relatório exportado. Alguém já passou por isso ou sabe como resolver o problema? Agradeço qualquer orientação que puderem me oferecer. At. Jobenil Júnior

2 2

Codificar nomes
by Amiko Bh 05 Out '18

05 Out '18

Pessoal: Não consegui achar instruções a respeito. Quero codificar (criar id?) nomes em um enorme banco de dados. Há vários nomes que se repetem. Estes teriam que ter a mesma identificação. Exemplo: Deste banco: Nome: Alexandre Aguiar Parreiras Alexandre Aguiar Parreiras Breno Pereira Galvão Carlos Daniel Pereira de Souza Daniel Prates Andrade Daniel Prates Andrade Elian Kanaan dos Santos Érick Daniel Sena de Jesus Quero ter este: Nome: ID Alexandre Aguiar Parreiras 1 Alexandre Aguiar Parreiras 1 Breno Pereira Galvão 2 Carlos Daniel Pereira de Souza 3 Daniel Prates Andrade 4 Daniel Prates Andrade 4 Elian Kanaan dos Santos 5 Érick Daniel Sena de Jesus 6 Muito Obrigado.

5 4

Gráfico em Linha com Marcações nas Amostras
by Leslie Watter 04 Out '18

04 Out '18

Olá a todos, Alguém sabe como faço um gráfico como o anexo usando o R? O meu objetivo é poder colocar o valor das amostras junto a elas no gráfico em linha. Obrigado LEslie -- Leslie H. Watter

2 2

Re: [R-br] Diferenças entre sistemas operacionais (geoR)
by Yury Duarte 04 Out '18

04 Out '18

Sim, Thiago. Até o último passo os resultados são iguais. A mesma grade com o mesmo número de pontos é gerada. As mesmas informações são passadas como parâmetro para a função, mas os resultados não batem. Nem mesmo em casos onde a função não quebra, os valores gerados no Ubuntu não batem com os valores gerados em Windows. Isso está me intrigando muito. Em qui, 4 de out de 2018 17:23, Thiago V. dos Santos < thi_veloso(a)yahoo.com.br> escreveu: > Nao deveria ser assim. > > O seu codigo produz resultados identicos ate o momento em que voce roda a > krige.conv? > > Em caso positivo, acho que seria uma boa ideia reportar esse erro ao Paulo > (paulojus(a)ufpr.br) ou ao Peter (p.diggle(a)lancaster.ac.uk) > > Greetings, > -- Thiago V. dos Santos > > Postdoctoral Research Fellow > Department of Climate and Space Science and Engineering > University of Michigan > > > On Thursday, October 4, 2018, 3:42:35 PM EDT, Yury Duarte via R-br < > r-br(a)listas.c3sl.ufpr.br> wrote: > > > Boa tarde a todos os coleas! > > Fiz um código simples para interpolar valores que tenho em uma grade que > construo dentro do próprio código. Para isso, estou utilizando um modelo > esférico de interpolação por krigagem através da função krige.conv(). > Estou achando muito estranho o fato de que, quando rodo o script em > ambiente Windows, não tenho problemas e meu script gera as saídas > exatamente como o esperado, entretanto, quando rodo o mesmo script (com o > mesmo banco de dados) em ambiente Linux (Ubuntu), a função krige.conv() > corrompe e o erro gerado é: > krige.control: micro.scale must be in the interval [0, nugget] > > Não encontrei nada em outros fóruns que pudesse me ajudar para explicar > isso. > Caso alguém tenha interesse em testar exatamente o mesmo conjunto de dados > que estou utilizando, informem que passo um link no google drive, já que o > código e os dados de entrada são grandes demais para serem anexados no > corpo do e-mail/nos anexos. > > Desde já, agradeço a atenção e a ajuda de todos! > > Yury Duarte > Engenheiro Agrônomo - ESALQ/USP > _______________________________________________ > 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. >

4 4

Diferenças entre sistemas operacionais (geoR)
by Yury Duarte 04 Out '18

04 Out '18

Boa tarde a todos os coleas! Fiz um código simples para interpolar valores que tenho em uma grade que construo dentro do próprio código. Para isso, estou utilizando um modelo esférico de interpolação por krigagem através da função krige.conv(). Estou achando muito estranho o fato de que, quando rodo o script em ambiente Windows, não tenho problemas e meu script gera as saídas exatamente como o esperado, entretanto, quando rodo o mesmo script (com o mesmo banco de dados) em ambiente Linux (Ubuntu), a função krige.conv() corrompe e o erro gerado é: krige.control: micro.scale must be in the interval [0, nugget] Não encontrei nada em outros fóruns que pudesse me ajudar para explicar isso. Caso alguém tenha interesse em testar exatamente o mesmo conjunto de dados que estou utilizando, informem que passo um link no google drive, já que o código e os dados de entrada são grandes demais para serem anexados no corpo do e-mail/nos anexos. Desde já, agradeço a atenção e a ajuda de todos! Yury Duarte Engenheiro Agrônomo - ESALQ/USP

1 0

Rmarkdown
by Edimeire Alexandra Pinto 03 Out '18

03 Out '18

Oi gente. Para aqueles que usam o rmarkdown: Existe algum alguma função que leia um arquivo em word? O que eu quero é o seguinte: a pessoa com um click consiga baixar um doc ( que não está na rede e sim no computador) para leitura, por exemplo, coloco um link ou crio um botão (como no shiny) e quando a pessoa da o click se consegue baixar um arquivo em word, sem desformatá-lo, que está numa pasta local no computador. Quero como se fosse uma função read.table que importa arquivos em csv, mas no meu caso é docx. Valeu gente!!!

2 3