<div dir="ltr">No arrows() o teu x0 e x1 nao deveria ser ger ao invés de 1:12?<div><br></div><div><div>casal10<-c(0.8402676,0.69461420,0.5656461,1.479279)#SD para 10 casais</div><div>casal1<-c(14.14000,14.21,17.37,17.26667)## Média 1casal</div>
<div><b>sd.casal10</b><-c(0.1166190,0.07520343,1.1059486,0.768739)#SD para 1 casal (eu troquei pra casal10 para o codigo funcionar)</div></div><div><br></div><div><div>ger<-c(3,6,9,12)## Geração</div><div>plot(ger,casal10,ylim=c(0,25),pch=16)</div>
<div>lines(ger,casal10)</div><div>points(ger,casal1, col='gray',pch=2)</div><div>lines(ger,casal1, col='gray')</div><div>arrows(<b>x0=ger, x1=ger</b>, y0=casal10+sd.casal10, y1=casal10-sd.casal10, code=3, length=0.1, angle=90)</div>
</div></div><div class="gmail_extra"><br><br><div class="gmail_quote">2013/1/11 ASANTOS <span dir="ltr"><<a href="mailto:alexandresantosbr@yahoo.com.br" target="_blank">alexandresantosbr@yahoo.com.br</a>></span><br>
<blockquote class="gmail_quote" style="margin:0 0 0 .8ex;border-left:1px #ccc solid;padding-left:1ex">Bom Dia Daniel,<br>
Ñão usei os dados brutos pois fiz uma transformação com os dados para análise. O problema com meu CRM foi a falta de concatenar (c) os erros padrões<br>
ficando:<br>
casal10<-c(0.8402676,0.<u></u>69461420,0.5656461,1.479279)#<u></u>SD para 10 casais<br>
casal1<-c(14.14000,14.21,17.<u></u>37,17.26667)## Média 1casal<br>
sd.casal1<-c(0.1166190,0.<u></u>07520343,1.1059486,0.768739)#<u></u>SD para 1 casal<div class="im"><br>
ger<-c(3,6,9,12)## Geração<br>
plot(ger,casal10,ylim=c(0,25),<u></u>pch=16)<br>
lines(ger,casal10)<br>
points(ger,casal1, col='gray',pch=2)<br>
lines(ger,casal1, col='gray')<br></div><div class="im">
arrows(x0=1:12, x1=1:12, y0=casal10+sd.casal10, y1=casal10-sd.casal10,<br></div>
+ code=3, length=0.1, angle=90)<br>
<br>
Mesmo assim os arrows não ficaram corretamente sobre os pontos,<br>
<br>
Obrigado,<br>
<br>
Alexandre<br>
<br>
<br>
Em 10/01/2013 23:49, Daniel Marcelino escreveu:<div class="im HOEnZb"><br>
<blockquote class="gmail_quote" style="margin:0 0 0 .8ex;border-left:1px #ccc solid;padding-left:1ex">
plot(ger,casal10,ylim=c(0,25),<u></u>pch=16)<br>
lines(ger,casal10)<br>
points(ger,casal1, col='gray',pch=2)<br>
lines(ger,casal1, col='gray')<br>
arrows(x0=1:12, x1=1:12, y0=casal10+sd.casal10, y1=casal10-sd.casal10,<br>
code=3, length=0.1, angle=90)<br>
</blockquote>
<br></div><div class="HOEnZb"><div class="h5">
-- <br>
==============================<u></u>==============================<u></u>==========<br>
Alexandre dos Santos<br>
Proteção Florestal<br>
IFMT - Instituto Federal de Educação, Ciência e Tecnologia de Mato Grosso<br>
Campus Cáceres<br>
Avenida dos Ramires, s/n<br>
Caixa Postal 744<br>
Bairro: Distrito Industrial<br>
Cáceres - MT CEP: 78.200-000<br>
Fone: <a href="tel:%28%2B55%29%2065%208132-8112" value="+556581328112" target="_blank">(+55) 65 8132-8112</a> (TIM) <a href="tel:%28%2B55%29%2065%209686-6970" value="+556596866970" target="_blank">(+55) 65 9686-6970</a> (VIVO)<br>
<a href="mailto:e-mails%3Aalexandresantosbr@yahoo.com.br" target="_blank">e-mails:alexandresantosbr@<u></u>yahoo.com.br</a><br>
<a href="mailto:alexandre.santos@cas.ifmt.edu.br" target="_blank">alexandre.santos@cas.ifmt.edu.<u></u>br</a><br>
==============================<u></u>==============================<u></u>==========<br>
<br>
______________________________<u></u>_________________<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/<u></u>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-<u></u>guia</a>) e forneça código mínimo reproduzível.<br>
</div></div></blockquote></div><br></div>