Re: [R-br] Digest R-br, volume 65, assunto 23
Bom dia pessoal, Agradeço as dicas, consegui com a sugestão do Thiago. Com a função: par(mfrow=c(2,2)) não funciona Edson. Obrigado a todos que tiraram um pouco de seu tempo para essa questão. Cordialmente, Marcos Paulo Técnico Agrícola em Zootecnia Bacharel em Agronomia Mestrando em Produção Vegetal - Universidade Federal de GoiásEstagiário de Pós-Graduação da Embrapa Arroz e Feijão/CNPAF-Santo Antônio de Goiás-GO Contato: (62) 85075783 http://lattes.cnpq.br/4322347592884852
From: r-br-request@listas.c3sl.ufpr.br Subject: Digest R-br, volume 65, assunto 23 To: r-br@listas.c3sl.ufpr.br Date: Fri, 13 May 2016 12:00:02 -0300
Enviar submissões para a lista de discussão R-br para r-br@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@listas.c3sl.ufpr.br
Você poderá entrar em contato com a pessoa que gerencia a lista pelo endereço r-br-owner@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. Multiplots usando lattice (marcos paulo) 2. Re: Multiplots usando lattice (salah) 3. Re: Multiplots usando lattice (Thiago V. dos Santos) 4. Re: Colocar legenda sem borda (Éder Comunello) 5. Re: Multiplots usando lattice (Éder Comunello) 6. unsubscribe (Nelio Machado) 7. Re: Multiplots usando lattice (Edson Lira)
----------------------------------------------------------------------
Message: 1 Date: Fri, 13 May 2016 06:14:26 +0300 From: marcos paulo <marcospaulo_agronomo@hotmail.com> To: "r-br@listas.c3sl.ufpr.br" <r-br@listas.c3sl.ufpr.br> Subject: [R-br] Multiplots usando lattice Message-ID: <BLU179-W177B236A6AB230A15BD101EE740@phx.gbl> Content-Type: text/plain; charset="iso-8859-1"
Pessoal estou querendo plotar 4 gráficos na mesma janela gráfica,usando o pacote lattice pra confecção desses plots. Porém não estou conseguindo colocar mais que dois na mesma janela, usando a função print. Segue exemplo: g1<- xyplot(NDVI~DAE|Cultivar, data=dados, col=1, layout=c(5,1), type=c("p","r"), xlab="DAE", ylab="NDVI", main='Vitrine 2014/2016', strip=strip.custom(bg="gray90")) g2<-xyplot(NDVI~IAF|Cultivar, data=dados, col=1, layout=c(5,1), type=c("p","r"), xlab="IAF", ylab="NDVI", strip=strip.custom(bg="gray90"))
g3<-xyplot(Chl~DAE|Cultivar, data=dados, col=1, layout=c(5,1), type=c("p","r"), xlab="DAE", ylab="Clorofila", strip=strip.custom(bg="gray90")) g4<-xyplot(Chl~IAF|Cultivar, data=dados, col=1, layout=c(5,1), type=c("p","r"), xlab="IAF", ylab="Clorofila", strip=strip.custom(bg="gray90")) print(g1, split=c(1,1,1,4), more=TRUE)print(g2, split=c(1,2,1,4))print(g3, split=c(1,3,1,4))print(g4, split=c(1,4,1,4)) Cordialmente, Marcos Paulo. Técnico Agrícola em Zootecnia Bacharel em Agronomia Mestrando em Produção Vegetal - Universidade Federal de GoiásEstagiário de Pós-Graduação da Embrapa Arroz e Feijão/CNPAF-Santo Antônio de Goiás-GO Contato: (62) 85075783 http://lattes.cnpq.br/4322347592884852
Livre de vírus. www.avast.com.
-------------- Próxima Parte ---------- Um anexo em HTML foi limpo... URL: <http://listas.inf.ufpr.br/pipermail/r-br/attachments/20160513/440c7009/attachment-0001.html>
------------------------------
Message: 2 Date: Fri, 13 May 2016 00:26:20 -0300 From: salah <salah3.1416@gmail.com> To: r-br@listas.c3sl.ufpr.br Subject: Re: [R-br] Multiplots usando lattice Message-ID: <5735495C.4090807@gmail.com> Content-Type: text/plain; charset="utf-8"; Format="flowed"
Olá Marcos
Talvez este exemplo lhe ajude
library(lattice)
# Data w <- as.matrix(dist(Loblolly)) x <- as.matrix(dist(HairEyeColor)) y <- as.matrix(dist(rock)) z <- as.matrix(dist(women))
# Plot assignments pw <- levelplot(w, scales = list(draw = FALSE)) # "scales..." removes axes px <- levelplot(x, scales = list(draw = FALSE)) py <- levelplot(y, scales = list(draw = FALSE)) pz <- levelplot(z, scales = list(draw = FALSE))
# Plot prints print(pw, split = c(1, 1, 2, 2), more = TRUE) print(px, split = c(2, 1, 2, 2), more = TRUE) print(py, split = c(1, 2, 2, 2), more = TRUE) print(pz, split = c(2, 2, 2, 2), more = FALSE) # more = FALSE is redundant
retirado de http://stackoverflow.com/questions/2540129/lattice-multiple-plots-in-one-win...
saudações
Em 13/05/2016 00:14, marcos paulo escreveu:
Pessoal estou querendo plotar 4 gráficos na mesma janela gráfica, usando o pacote lattice pra confecção desses plots. Porém não estou conseguindo colocar mais que dois na mesma janela, usando a função print.
Segue exemplo:
g1<- xyplot(NDVI~DAE|Cultivar, data=dados, col=1, layout=c(5,1), type=c("p","r"), xlab="DAE", ylab="NDVI", main='Vitrine 2014/2016', strip=strip.custom(bg="gray90"))
g2<-xyplot(NDVI~IAF|Cultivar, data=dados, col=1, layout=c(5,1), type=c("p","r"), xlab="IAF", ylab="NDVI", strip=strip.custom(bg="gray90"))
g3<-xyplot(Chl~DAE|Cultivar, data=dados, col=1, layout=c(5,1), type=c("p","r"), xlab="DAE", ylab="Clorofila", strip=strip.custom(bg="gray90"))
g4<-xyplot(Chl~IAF|Cultivar, data=dados, col=1, layout=c(5,1), type=c("p","r"), xlab="IAF", ylab="Clorofila", strip=strip.custom(bg="gray90")) print(g1, split=c(1,1,1,4), more=TRUE) print(g2, split=c(1,2,1,4)) print(g3, split=c(1,3,1,4)) print(g4, split=c(1,4,1,4))
Cordialmente, Marcos Paulo.
*Técnico Agrícola em Zootecnia Bacharel em Agronomia * * * *Mestrando em Produção Vegetal - Universidade Federal de Goiás* *Estagiário de Pós-Graduação da Embrapa Arroz e Feijão/CNPAF-Santo Antônio de Goiás-GO* * * *Contato: (62) 85075783*
http://lattes.cnpq.br/4322347592884852
<https://www.avast.com/sig-email?utm_medium=email&utm_source=link&utm_campaign=sig-email&utm_content=webmail> Livre de vírus. www.avast.com <https://www.avast.com/sig-email?utm_medium=email&utm_source=link&utm_campaign=sig-email&utm_content=webmail>.
_______________________________________________ R-br mailing list R-br@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/20160513/e3b2a537/attachment-0001.html>
------------------------------
Message: 3 Date: Fri, 13 May 2016 11:11:46 +0000 (UTC) From: "Thiago V. dos Santos" <thi_veloso@yahoo.com.br> To: "r-br@listas.c3sl.ufpr.br" <r-br@listas.c3sl.ufpr.br> Subject: Re: [R-br] Multiplots usando lattice Message-ID: <1996625406.1461259.1463137906486.JavaMail.yahoo@mail.yahoo.com> Content-Type: text/plain; charset=UTF-8
library(gridExtra)
grid.arrange(g1,g2,g3,g4, ncol=2, nrow=2)
Greetings, -- Thiago V. dos Santos
PhD student Land and Atmospheric Science University of Minnesota
On Thursday, May 12, 2016 10:26 PM, salah <salah3.1416@gmail.com> wrote:
Olá Marcos
Talvez este exemplo lhe ajude
library(lattice)
# Data w <- as.matrix(dist(Loblolly)) x <- as.matrix(dist(HairEyeColor)) y <- as.matrix(dist(rock)) z <- as.matrix(dist(women))
# Plot assignments pw <- levelplot(w, scales = list(draw = FALSE)) # "scales..." removes axes px <- levelplot(x, scales = list(draw = FALSE)) py <- levelplot(y, scales = list(draw = FALSE)) pz <- levelplot(z, scales = list(draw = FALSE))
# Plot prints print(pw, split = c(1, 1, 2, 2), more = TRUE) print(px, split = c(2, 1, 2, 2), more = TRUE) print(py, split = c(1, 2, 2, 2), more = TRUE) print(pz, split = c(2, 2, 2, 2), more = FALSE) # more = FALSE is redundant
retirado de http://stackoverflow.com/questions/2540129/lattice-multiple-plots-in-one-win...
saudações
Em 13/05/2016 00:14, marcos paulo escreveu:
Pessoal estou querendo plotar 4 gráficos na mesma janela gráfica, usando o pacote lattice pra confecção desses plots. Porém não estou conseguindo colocar mais que dois na mesma janela, usando a função print.
Segue exemplo:
g1<- xyplot(NDVI~DAE|Cultivar, data=dados, col=1, layout=c(5,1), type=c("p","r"), xlab="DAE", ylab="NDVI", main='Vitrine 2014/2016', strip=strip.custom(bg="gray90"))
g2<-xyplot(NDVI~IAF|Cultivar, data=dados, col=1, layout=c(5,1), type=c("p","r"), xlab="IAF", ylab="NDVI", strip=strip.custom(bg="gray90"))
g3<-xyplot(Chl~DAE|Cultivar, data=dados, col=1, layout=c(5,1), type=c("p","r"), xlab="DAE", ylab="Clorofila", strip=strip.custom(bg="gray90"))
g4<-xyplot(Chl~IAF|Cultivar, data=dados, col=1, layout=c(5,1), type=c("p","r"), xlab="IAF", ylab="Clorofila", strip=strip.custom(bg="gray90"))
print(g1, split=c(1,1,1,4), more=TRUE) print(g2, split=c(1,2,1,4)) print(g3, split=c(1,3,1,4)) print(g4, split=c(1,4,1,4))
Cordialmente, Marcos Paulo.
Técnico Agrícola em Zootecnia Bacharel em Agronomia
Mestrando em Produção Vegetal - Universidade Federal de Goiás Estagiário de Pós-Graduação da Embrapa Arroz e Feijão/CNPAF-Santo Antônio de Goiás-GO
Contato: (62) 85075783
http://lattes.cnpq.br/4322347592884852
Livre de vírus. www.avast.com.
_______________________________________________ R-br mailing list R-br@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.
_______________________________________________ R-br mailing list R-br@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� c�igo m�imo reproduz�el.
------------------------------
Message: 4 Date: Fri, 13 May 2016 09:06:14 -0400 From: Éder Comunello <comunello.eder@gmail.com> To: "r-br@listas.c3sl.ufpr.br" <r-br@listas.c3sl.ufpr.br> Subject: Re: [R-br] Colocar legenda sem borda Message-ID: <CABmC8gnhOuvm2MnK0Uh2Y1TMCsA9++4skj3XhDATz+-Y9Ur4eg@mail.gmail.com> Content-Type: text/plain; charset="utf-8"
Bom dia,
Outra solução...
B <- matrix(c(578,1289, 439,1061), ncol=2) colnames(B) <- c("Feminino","Masculino") rownames(B) <- c("População","IBGE") barplot(B, beside=T, legend.text=TRUE, col=c(4,"limegreen"), main="", ylim=c(0,2000), args.legend = c(bty="n"))
[image: Imagem inline 1]
================================================ Éder Comunello Agronomist (UEM), MSc in Environ. Sciences (UEM) DSc in Agricultural Systems Engineering (USP/Esalq) Brazilian Agricultural Research Corporation (Embrapa) Dourados, MS, Brazil |<O>| ================================================ GEO, -22.2752, -54.8182, 408m UTC-04:00 / DST: UTC-03:00
Em 12 de maio de 2016 23:08, Maurício Lordêlo <mslordelo@gmail.com> escreveu:
Segue uma sugestão: B<-matrix(c(578,1289, 439,1061),ncol=2) colnames(B)=c("Feminino","Masculino") rownames(B)=c("População","IBGE") barplot(B, beside=T,col=c("blue","limegreen"), main="",ylim=c(0,2000)) legend(x=5, y=1900,xpd=FALSE, legend=c("População","IBGE"),fill=c("blue","limegreen"),bty="n")
Maurício
Em 12 de maio de 2016 17:21, Andre Oliveira <andreolsouza@yahoo.com.br> escreveu:
Boa tarde, como posso tirar borda desta legenda? Tentei bty="n" mas não deu certo! B<-matrix(c(578,1289, 439,1061),ncol=2) colnames(B)=c("Feminino","Masculino") rownames(B)=c("População","IBGE") barplot(B, beside=T,legend.text=TRUE,col=c(4,"limegreen"), main="",ylim=c(0,2000)) Obrigado
André Oliveira Souza. Graduação em Matemática, mestrado em estatística aplicada.Instituto Federal de Educação, Ciência e Tecnologia do Espirito Santo. IFES
_______________________________________________ R-br mailing list R-br@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.
_______________________________________________ R-br mailing list R-br@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/20160513/7b7106fc/attachment-0001.html> -------------- Próxima Parte ---------- Um anexo não-texto foi limpo... Nome: image.png Tipo: image/png Tamanho: 9527 bytes Descrição: não disponível URL: <http://listas.inf.ufpr.br/pipermail/r-br/attachments/20160513/7b7106fc/attachment-0001.png>
------------------------------
Message: 5 Date: Fri, 13 May 2016 09:32:32 -0400 From: Éder Comunello <comunello.eder@gmail.com> To: "r-br@listas.c3sl.ufpr.br" <r-br@listas.c3sl.ufpr.br> Subject: Re: [R-br] Multiplots usando lattice Message-ID: <CABmC8gkJEK_kMbjDzAq=-MiUHK+E_6wfj+tXkGtKpQU-ssB0dw@mail.gmail.com> Content-Type: text/plain; charset="utf-8"
Marcos,
Tentou adicionar o argumento more=T nas instruções print de de g2 e g3?
================================================ Éder Comunello Agronomist (UEM), MSc in Environ. Sciences (UEM) DSc in Agricultural Systems Engineering (USP/Esalq) Brazilian Agricultural Research Corporation (Embrapa) Dourados, MS, Brazil |<O>| ================================================ GEO, -22.2752, -54.8182, 408m UTC-04:00 / DST: UTC-03:00
Em 12 de maio de 2016 23:14, marcos paulo <marcospaulo_agronomo@hotmail.com> escreveu:
Pessoal estou querendo plotar 4 gráficos na mesma janela gráfica, usando o pacote lattice pra confecção desses plots. Porém não estou conseguindo colocar mais que dois na mesma janela, usando a função print.
Segue exemplo:
g1<- xyplot(NDVI~DAE|Cultivar, data=dados, col=1, layout=c(5,1), type=c("p","r"), xlab="DAE", ylab="NDVI", main='Vitrine 2014/2016', strip=strip.custom(bg="gray90"))
g2<-xyplot(NDVI~IAF|Cultivar, data=dados, col=1, layout=c(5,1), type=c("p","r"), xlab="IAF", ylab="NDVI", strip=strip.custom(bg="gray90"))
g3<-xyplot(Chl~DAE|Cultivar, data=dados, col=1, layout=c(5,1), type=c("p","r"), xlab="DAE", ylab="Clorofila", strip=strip.custom(bg="gray90"))
g4<-xyplot(Chl~IAF|Cultivar, data=dados, col=1, layout=c(5,1), type=c("p","r"), xlab="IAF", ylab="Clorofila", strip=strip.custom(bg="gray90"))
print(g1, split=c(1,1,1,4), more=TRUE) print(g2, split=c(1,2,1,4)) print(g3, split=c(1,3,1,4)) print(g4, split=c(1,4,1,4))
Cordialmente, Marcos Paulo.
*Técnico Agrícola em ZootecniaBacharel em Agronomia *
*Mestrando em Produção Vegetal - Universidade Federal de Goiás* *Estagiário de Pós-Graduação da Embrapa Arroz e Feijão/CNPAF-Santo Antônio de Goiás-GO*
*Contato: (62) 85075783*
http://lattes.cnpq.br/4322347592884852
<https://www.avast.com/sig-email?utm_medium=email&utm_source=link&utm_campaign=sig-email&utm_content=webmail> Livre de vírus. www.avast.com <https://www.avast.com/sig-email?utm_medium=email&utm_source=link&utm_campaign=sig-email&utm_content=webmail>. <#m_2740539342992165564_DDB4FAA8-2DD7-40BB-A1B8-4E2AA1F9FDF2>
_______________________________________________ R-br mailing list R-br@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/20160513/255d26ed/attachment-0001.html>
------------------------------
Message: 6 Date: Fri, 13 May 2016 10:35:16 -0300 From: Nelio Machado <neliomachado@gmail.com> To: R-br@listas.c3sl.ufpr.br Subject: [R-br] unsubscribe Message-ID: <CAKKvw8PyRtPsCy2V-W5=UWihRucwngY-krGCQnCUfMzfthC=Cw@mail.gmail.com> Content-Type: text/plain; charset="utf-8"
Please, I'd like to unsubscribe this list.
Thanks
Nelio Machado
Antes de imprimir pense em seu compromisso com o Meio Ambiente e no comprometimento com os Custos.
Se for encaminhar esta mensagem, por favor: 1. Apague o meu e-mail e o meu nome; 2. Encaminhe como cópia oculta (Cco ou Bcc) aos seus destinatários; 3. Apague também, se houver, os endereços dos amigos antes de reenviar; 4. Agindo sempre assim dificultaremos a disseminação de vírus, spams e banners. -------------- Próxima Parte ---------- Um anexo em HTML foi limpo... URL: <http://listas.inf.ufpr.br/pipermail/r-br/attachments/20160513/033f4bc9/attachment-0001.html>
------------------------------
Message: 7 Date: Fri, 13 May 2016 13:47:27 +0000 (UTC) From: Edson Lira <edinhoestat@yahoo.com.br> To: "r-br@listas.c3sl.ufpr.br" <r-br@listas.c3sl.ufpr.br>, "comunello.eder@gmail.com" <comunello.eder@gmail.com> Subject: Re: [R-br] Multiplots usando lattice Message-ID: <1766220594.1777376.1463147247246.JavaMail.yahoo@mail.yahoo.com> Content-Type: text/plain; charset="utf-8"
Não sei se vai funcionar no lattice.Use: par(mfrow=c(2,2))
Edson Lira Estatístico Manaus-Amazonas
Em Sexta-feira, 13 de Maio de 2016 9:33, Éder Comunello <comunello.eder@gmail.com> escreveu:
Marcos,
Tentou adicionar o argumento more=T nas instruções print de de g2 e g3?
================================================ Éder ComunelloAgronomist (UEM), MSc in Environ. Sciences (UEM) DSc in Agricultural Systems Engineering (USP/Esalq) Brazilian Agricultural Research Corporation (Embrapa)Dourados, MS, Brazil |<O>|================================================ GEO, -22.2752, -54.8182, 408m UTC-04:00 / DST: UTC-03:00
Em 12 de maio de 2016 23:14, marcos paulo <marcospaulo_agronomo@hotmail.com> escreveu:
Pessoal estou querendo plotar 4 gráficos na mesma janela gráfica,usando o pacote lattice pra confecção desses plots. Porém não estou conseguindo colocar mais que dois na mesma janela, usando a função print. Segue exemplo: g1<- xyplot(NDVI~DAE|Cultivar, data=dados, col=1, layout=c(5,1), type=c("p","r"), xlab="DAE", ylab="NDVI", main='Vitrine 2014/2016', strip=strip.custom(bg="gray90")) g2<-xyplot(NDVI~IAF|Cultivar, data=dados, col=1, layout=c(5,1), type=c("p","r"), xlab="IAF", ylab="NDVI", strip=strip.custom(bg="gray90"))
g3<-xyplot(Chl~DAE|Cultivar, data=dados, col=1, layout=c(5,1), type=c("p","r"), xlab="DAE", ylab="Clorofila", strip=strip.custom(bg="gray90")) g4<-xyplot(Chl~IAF|Cultivar, data=dados, col=1, layout=c(5,1), type=c("p","r"), xlab="IAF", ylab="Clorofila", strip=strip.custom(bg="gray90")) print(g1, split=c(1,1,1,4), more=TRUE)print(g2, split=c(1,2,1,4))print(g3, split=c(1,3,1,4))print(g4, split=c(1,4,1,4)) Cordialmente, Marcos Paulo. Técnico Agrícola em Zootecnia Bacharel em Agronomia Mestrando em Produção Vegetal - Universidade Federal de GoiásEstagiário de Pós-Graduação da Embrapa Arroz e Feijão/CNPAF-Santo Antônio de Goiás-GO Contato: (62) 85075783 http://lattes.cnpq.br/4322347592884852
| | Livre de vírus. www.avast.com. |
_______________________________________________ R-br mailing list R-br@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.
_______________________________________________ R-br mailing list R-br@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� c�igo m�imo reproduz�el.
-------------- Próxima Parte ---------- Um anexo em HTML foi limpo... URL: <http://listas.inf.ufpr.br/pipermail/r-br/attachments/20160513/91ca0564/attachment-0001.html>
------------------------------
Subject: Legenda do Digest
_______________________________________________ R-br mailing list R-br@listas.c3sl.ufpr.br https://listas.inf.ufpr.br/cgi-bin/mailman/listinfo/r-br
------------------------------
Fim da Digest R-br, volume 65, assunto 23 *****************************************
participantes (1)
-
marcos paulo