<div dir="ltr">tidyverse<div><br clear="all"><div><div dir="ltr" class="gmail_signature" data-smartmail="gmail_signature"><div dir="ltr"><div><div dir="ltr"><div><div dir="ltr"><div dir="ltr"><div dir="ltr"><div dir="ltr"><div dir="ltr"><div dir="ltr"><p class="MsoNormal"><b><span style="font-family:Verdana,sans-serif;color:rgb(102,102,102)">Cid Edson Mendonça Póvoas<br>
</span></b><b><span style="font-size:10pt;font-family:Verdana,sans-serif;color:rgb(102,102,102)">Cel: +55 (73) 99151-9565</span></b><span></span></p>

<p class="MsoNormal"><b><span style="font-size:10pt;font-family:Verdana,sans-serif;color:rgb(102,102,102)">Engenheiro </span></b><font color="#666666" face="Verdana, sans-serif"><span style="font-size:13.3333px"><b><span></span>Agrônomo</b></span></font></p><p class="MsoNormal"><font color="#666666" face="Verdana, sans-serif"><span style="font-size:13.3333px"><b>Analista de dados </b></span></font></p>

<p class="MsoNormal"><b><span style="font-size:10pt;font-family:Verdana,sans-serif;color:rgb(102,102,102)">Técnico em Segurança do Trabalho </span></b><span></span></p>

<p class="MsoNormal"><b><span style="font-size:10pt;font-family:Verdana,sans-serif;color:rgb(102,102,102)">LinkedIn: </span></b><b><span style="font-size:10pt;font-family:Verdana,sans-serif;color:rgb(0,176,240)"><a href="http://br.linkedin.com/in/cidedson/" target="_blank"><span style="color:rgb(0,176,240)">http://br.linkedin.com/in/cidedson/</span></a></span></b><span></span></p>

<p class="MsoNormal"><b><span style="font-size:10pt;font-family:Verdana,sans-serif;color:rgb(102,102,102)">Lattes: </span></b><b><span style="font-size:10pt;font-family:Verdana,sans-serif;color:rgb(0,176,240)"><a href="http://lattes.cnpq.br/2303498368142537" target="_blank"><span style="color:rgb(0,176,240)">http://lattes.cnpq.br/2303498368142537</span></a></span></b><b><span style="font-size:10pt;font-family:Verdana,sans-serif"><span></span></span></b></p>

<p class="MsoNormal"><br></p></div></div></div></div></div></div></div></div></div></div></div></div><br></div></div><br><div class="gmail_quote"><div dir="ltr" class="gmail_attr">Em qua., 11 de nov. de 2020 às 21:11, Mauro Sznelwar por (R-br) <<a href="mailto:r-br@listas.c3sl.ufpr.br">r-br@listas.c3sl.ufpr.br</a>> escreveu:<br></div><blockquote class="gmail_quote" style="margin:0px 0px 0px 0.8ex;border-left:1px solid rgb(204,204,204);padding-left:1ex"><div><span style="font-size:medium;color:rgb(0,0,255)">Eu tentei rodar e não consegui. Não reconhece %>%, tem um bibliotéca para isto?</span></div>
<div> </div>
<div> </div>
<div dir="ltr">
<div>agrupado por cyl</div>
<div> </div>
mtcars %>% group_by(cyl) %>% <br>  mutate(mpg.m = mean(mpg),<br>  wt.m = mean(wt)) %>% <br>  ggplot(aes(x=mpg, y=wt, color=as.factor( cyl ))) +<br>  geom_point(size=1) +<br>  geom_vline(aes(xintercept = mpg.m), col="black", linetype=2) +<br>  geom_hline(aes(yintercept = wt.m), col="red", linetype=2) +<br>  facet_grid( cyl ~ gear) +<br>  theme(legend.position="none")
<div> </div>
<div>ou geral</div>
<div> </div>
<div>mtcars %>% </div>
<div>  mutate(mpg.m = mean(mpg),<br>  wt.m = mean(wt)) %>% <br>  ggplot(aes(x=mpg, y=wt, color=as.factor( cyl ))) +<br>  geom_point(size=1) +<br>  geom_vline(aes(xintercept = mpg.m), col="black", linetype=2) +<br>  geom_hline(aes(yintercept = wt.m), col="red", linetype=2) +<br>  facet_grid( cyl ~ gear) +<br>  theme(legend.position="none")<br>
<div>
<div dir="ltr">
<div dir="ltr">
<div dir="ltr">
<div dir="ltr">
<div dir="ltr">
<div dir="ltr">
<div dir="ltr">
<div dir="ltr">
<div dir="ltr">
<p class="MsoNormal"> </p>
<p class="MsoNormal"><strong><span style="font-family:Verdana,sans-serif;color:rgb(102,102,102)"> </span></strong></p>
<p class="MsoNormal"><strong><span style="font-family:Verdana,sans-serif;color:rgb(102,102,102)"> </span></strong></p>
<p class="MsoNormal"><strong><span style="font-family:Verdana,sans-serif;color:rgb(102,102,102)">Cid Edson Mendonça Póvoas<br> </span></strong><strong><span style="font-size:10pt;font-family:Verdana,sans-serif;color:rgb(102,102,102)">Cel: +55 (73) 99151-9565</span></strong></p>
<p class="MsoNormal"><strong><span style="font-size:10pt;font-family:Verdana,sans-serif;color:rgb(102,102,102)">Engenheiro </span></strong><span style="color:rgb(102,102,102);font-family:Verdana,sans-serif"><span style="font-size:13.3333px"><strong>Agrônomo</strong></span></span></p>
<p class="MsoNormal"><span style="color:rgb(102,102,102);font-family:Verdana,sans-serif"><span style="font-size:13.3333px"><strong>Analista de dados </strong></span></span></p>
<p class="MsoNormal"><strong><span style="font-size:10pt;font-family:Verdana,sans-serif;color:rgb(102,102,102)">Técnico em Segurança do Trabalho </span></strong></p>
<p class="MsoNormal"><strong><span style="font-size:10pt;font-family:Verdana,sans-serif;color:rgb(102,102,102)">LinkedIn: </span></strong><strong><span style="font-size:10pt;font-family:Verdana,sans-serif;color:rgb(0,176,240)"><a href="http://br.linkedin.com/in/cidedson/" target="_blank"><span style="color:rgb(0,176,240)">http://br.linkedin.com/in/cidedson/</span></a></span></strong></p>
<p class="MsoNormal"><strong><span style="font-size:10pt;font-family:Verdana,sans-serif;color:rgb(102,102,102)">Lattes: </span></strong><strong><span style="font-size:10pt;font-family:Verdana,sans-serif;color:rgb(0,176,240)"><a href="http://lattes.cnpq.br/2303498368142537" target="_blank"><span style="color:rgb(0,176,240)">http://lattes.cnpq.br/2303498368142537</span></a></span></strong></p>
<p class="MsoNormal"> </p>
</div>
</div>
</div>
</div>
</div>
</div>
</div>
</div>
</div>
</div>
</div>
</div>
<div> </div>
<div class="gmail_quote">
<div class="gmail_attr" dir="ltr">Em qua., 11 de nov. de 2020 às 14:46, Marcelo Laia por (R-br) <<a href="http://../../../undefined//compose?to=r-br@listas.c3sl.ufpr.br" target="_blank">r-br@listas.c3sl.ufpr.br</a>> escreveu:</div>
<blockquote class="gmail_quote" style="margin:0px 0px 0px 0.8ex;border-left:1px solid rgb(204,204,204);padding-left:1ex">Colegas,<br> <br> Estou usando a rotina abaixo para produzir gráficos de Altura ~ DAP em<br> um fatorial com Clones em diferentes Espaçamentos.<br> <br> O código ficou assim:<br> <br> ggplot( dat , aes(x=DAP, y=Altura, color=as.factor(Espacamento) )) + <br>     geom_point(size=1) +<br>     facet_grid(Espacamento ~ Clone) +<br>     theme(legend.position="none")<br> <br> Como eu faço para traçar a média do DAP (y) e da Altura (x) em cada<br> grid?<br> <br> É possível simular o código acima com os pacotes e código abaixo:<br> <br> library(ggplot2)<br> head(mtcars)<br> <br> ggplot( mtcars , aes(x=mpg, y=wt, color=as.factor( cyl ))) + <br>   geom_point(size=1) +<br>   facet_grid( cyl ~ gear) +<br>   theme(legend.position="none")<br> <br> Obrigado<br> <br> -- <br> Marcelo<br> _______________________________________________<br> R-br mailing list<br> <a href="http://../../../undefined//compose?to=R-br@listas.c3sl.ufpr.br" target="_blank">R-br@listas.c3sl.ufpr.br</a><br> <a href="https://listas.inf.ufpr.br/cgi-bin/mailman/listinfo/r-br" rel="noreferrer" target="_blank">https://listas.inf.ufpr.br/cgi-bin/mailman/listinfo/r-br</a><br> Leia o guia de postagem (<a href="http://www.leg.ufpr.br/r-br-guia" rel="noreferrer" target="_blank">http://www.leg.ufpr.br/r-br-guia</a>) e forneça código mínimo reproduzível.</blockquote>
</div>
<div>_______________________________________________<br>R-br mailing list<br><a href="mailto:R-br@listas.c3sl.ufpr.br" target="_blank">R-br@listas.c3sl.ufpr.br</a><br><a href="https://listas.inf.ufpr.br/cgi-bin/mailman/listinfo/r-br" target="_blank">https://listas.inf.ufpr.br/cgi-bin/mailman/listinfo/r-br</a><br>Leia o guia de postagem (<a href="http://www.leg.ufpr.br/r-br-guia" target="_blank">http://www.leg.ufpr.br/r-br-guia</a>) e forneça código mínimo reproduzível.<br><br></div>_______________________________________________<br>
R-br mailing list<br>
<a href="mailto:R-br@listas.c3sl.ufpr.br" target="_blank">R-br@listas.c3sl.ufpr.br</a><br>
<a href="https://listas.inf.ufpr.br/cgi-bin/mailman/listinfo/r-br" rel="noreferrer" target="_blank">https://listas.inf.ufpr.br/cgi-bin/mailman/listinfo/r-br</a><br>
Leia o guia de postagem (<a href="http://www.leg.ufpr.br/r-br-guia" rel="noreferrer" target="_blank">http://www.leg.ufpr.br/r-br-guia</a>) e forneça código mínimo reproduzível.<br>
</blockquote></div>