[R-br] Plot (x,y) com desvios erro padrão da média como linha vertical [RESOLVIDO]

ASANTOS alexandresantosbr em yahoo.com.br
Sábado Janeiro 12 12:53:35 BRST 2013


Obrigado Daniel e Rodrigo, problema resolvido, segue CRM abaixo:

casal10<-c(16.03636,16.14,16.62,23.05)##Média 10 casais
sd.casal10<-(0.8402676,0.69461420,0.5656461,1.479279)#SD para 10 casais
casal1<-c(14.14000,14.21,17.37,17.26667)## Média 1casal
sd.casal1<-c(0.1166190,0.07520343,1.1059486,0.768739)#SD para 1 casal
ger<-c(3,6,9,12)## Geração
plot(ger,casal10,ylim=c(0,25),pch=16)
lines(ger,casal10)
points(ger,casal1, col='gray',pch=2)
lines(ger,casal1, col='gray')
arrows(x0=ger, x1=ger, y0=casal10+sd.casal10, y1=casal10-sd.casal10, code=3,
length=0.1, angle=90)
arrows(x0=ger, x1=ger, y0=casal1+sd.casal1, y1=casal1-sd.casal1, code=3,
length=0.1, angle=90, col='gray')
#

Alexandre


Em 11/01/2013 20:12, Daniel Marcelino escreveu:
> Sim, pode ser. Você conseguiu plotar afinal?
>
> Daniel
>
> 2013/1/11 Rodrigo Coster <rcoster em gmail.com>:
>> No arrows() o teu x0 e x1 nao deveria ser ger ao invés de 1:12?
>>
>> casal10<-c(0.8402676,0.69461420,0.5656461,1.479279)#SD para 10 casais
>> casal1<-c(14.14000,14.21,17.37,17.26667)## Média 1casal
>> sd.casal10<-c(0.1166190,0.07520343,1.1059486,0.768739)#SD para 1 casal (eu
>> troquei pra casal10 para o codigo funcionar)
>>
>> ger<-c(3,6,9,12)## Geração
>> plot(ger,casal10,ylim=c(0,25),pch=16)
>> lines(ger,casal10)
>> points(ger,casal1, col='gray',pch=2)
>> lines(ger,casal1, col='gray')
>> arrows(x0=ger, x1=ger, y0=casal10+sd.casal10, y1=casal10-sd.casal10, code=3,
>> length=0.1, angle=90)
>>
>>
>> 2013/1/11 ASANTOS <alexandresantosbr em yahoo.com.br>
>>> Bom Dia Daniel,
>>>     Ñã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
>>>   ficando:
>>> casal10<-c(0.8402676,0.69461420,0.5656461,1.479279)#SD para 10 casais
>>> casal1<-c(14.14000,14.21,17.37,17.26667)## Média 1casal
>>> sd.casal1<-c(0.1166190,0.07520343,1.1059486,0.768739)#SD para 1 casal
>>>
>>> ger<-c(3,6,9,12)## Geração
>>> plot(ger,casal10,ylim=c(0,25),pch=16)
>>> lines(ger,casal10)
>>> points(ger,casal1, col='gray',pch=2)
>>> lines(ger,casal1, col='gray')
>>> arrows(x0=1:12, x1=1:12, y0=casal10+sd.casal10, y1=casal10-sd.casal10,
>>> + code=3, length=0.1, angle=90)
>>>
>>> Mesmo assim os arrows não ficaram corretamente sobre os pontos,
>>>
>>> Obrigado,
>>>
>>> Alexandre
>>>
>>>
>>> Em 10/01/2013 23:49, Daniel Marcelino escreveu:
>>>
>>>> plot(ger,casal10,ylim=c(0,25),pch=16)
>>>> lines(ger,casal10)
>>>> points(ger,casal1, col='gray',pch=2)
>>>> lines(ger,casal1, col='gray')
>>>> arrows(x0=1:12, x1=1:12, y0=casal10+sd.casal10, y1=casal10-sd.casal10,
>>>> code=3, length=0.1, angle=90)
>>>
>>> --
>>> ======================================================================
>>> Alexandre dos Santos
>>> Proteção Florestal
>>> IFMT - Instituto Federal de Educação, Ciência e Tecnologia de Mato Grosso
>>> Campus Cáceres
>>> Avenida dos Ramires, s/n
>>> Caixa Postal 744
>>> Bairro: Distrito Industrial
>>> Cáceres - MT                      CEP: 78.200-000
>>> Fone: (+55) 65 8132-8112 (TIM)   (+55) 65 9686-6970 (VIVO)
>>> e-mails:alexandresantosbr em yahoo.com.br
>>>          alexandre.santos em cas.ifmt.edu.br
>>> ======================================================================
>>>
>>> _______________________________________________
>>> R-br mailing list
>>> R-br em 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 em 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.
>
>

-- 
======================================================================
Alexandre dos Santos
Proteção Florestal
IFMT - Instituto Federal de Educação, Ciência e Tecnologia de Mato Grosso
Campus Cáceres
Avenida dos Ramires, s/n
Caixa Postal 744
Bairro: Distrito Industrial
Cáceres - MT                      CEP: 78.200-000
Fone: (+55) 65 8132-8112 (TIM)   (+55) 65 9686-6970 (VIVO)
e-mails:alexandresantosbr em yahoo.com.br
         alexandre.santos em cas.ifmt.edu.br
======================================================================



Mais detalhes sobre a lista de discussão R-br