Eu tentei rodar e não consegui. Não reconhece %>%, tem um bibliotéca para isto?
agrupado por cyl
mutate(mpg.m = mean(mpg),
wt.m = mean(wt)) %>%
ggplot(aes(x=mpg, y=wt, color=as.factor( cyl ))) +
geom_point(size=1) +
geom_vline(aes(xintercept = mpg.m), col="black", linetype=2) +
geom_hline(aes(yintercept = wt.m), col="red", linetype=2) +
facet_grid( cyl ~ gear) +
theme(legend.position="none")
ou geral
mtcars %>%
mutate(mpg.m = mean(mpg),
wt.m = mean(wt)) %>%
ggplot(aes(x=mpg, y=wt, color=as.factor( cyl ))) +
geom_point(size=1) +
geom_vline(aes(xintercept = mpg.m), col="black", linetype=2) +
geom_hline(aes(yintercept = wt.m), col="red", linetype=2) +
facet_grid( cyl ~ gear) +
theme(legend.position="none")
wt.m = mean(wt)) %>%
ggplot(aes(x=mpg, y=wt, color=as.factor( cyl ))) +
geom_point(size=1) +
geom_vline(aes(xintercept = mpg.m), col="black", linetype=2) +
geom_hline(aes(yintercept = wt.m), col="red", linetype=2) +
facet_grid( cyl ~ gear) +
theme(legend.position="none")
Cid Edson Mendonça Póvoas
Cel: +55 (73) 99151-9565
Engenheiro Agrônomo
Analista de dados
Técnico em Segurança do Trabalho
LinkedIn: http://br.linkedin.com/in/cidedson/
Lattes: http://lattes.cnpq.br/2303498368142537
Em qua., 11 de nov. de 2020 às 14:46, Marcelo Laia por (R-br) <r-br@listas.c3sl.ufpr.br> escreveu:
Colegas,
Estou usando a rotina abaixo para produzir gráficos de Altura ~ DAP em
um fatorial com Clones em diferentes Espaçamentos.
O código ficou assim:
ggplot( dat , aes(x=DAP, y=Altura, color=as.factor(Espacamento) )) +
geom_point(size=1) +
facet_grid(Espacamento ~ Clone) +
theme(legend.position="none")
Como eu faço para traçar a média do DAP (y) e da Altura (x) em cada
grid?
É possível simular o código acima com os pacotes e código abaixo:
library(ggplot2)
head(mtcars)
ggplot( mtcars , aes(x=mpg, y=wt, color=as.factor( cyl ))) +
geom_point(size=1) +
facet_grid( cyl ~ gear) +
theme(legend.position="none")
Obrigado
--
Marcelo
_______________________________________________
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.
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.