<div dir="ltr">Saudações a todos,<div><br><div>Observando este exemplo (help da função "ts")</div><div><br></div><div><div>z <- ts(matrix(rnorm(300), 100, 3), start = c(1961, 1), frequency = 12)</div><div>plot(z)<br>
</div><div><br></div></div><div>tem-se três gráficos empilhados, com uma série em cada um.</div><div>Gostaria de saber se há possibilidade de que, em cada um dos gráficos, acrescentar outras linhas para efeito de comparação.</div>
<div>Por exemplo, suponha que eu construa um único gráfico com quatro linhas da seguinte forma:</div><div><div>time<-c(5,7,9,11,13) </div><div>m1<-c(94.1,91.9,92.1,92.8,92.3) </div><div>m2<-c(96.3,95.7,95.8,95.1,95.6) </div>
<div>m3<-c(91.6,91.0,91.1,90.0,88.6) </div><div>m4<-c(95.9,92.9,100.0,90.9,91.1) </div><div>plot(tempo, m1,type="b",main="Percentual de IC´s que contém o parâmetro para X",xlab="tempo",ylab="%",col="blue",ylim=c(70,100)) </div>
<div>lines(tempo, m2,col="red",type="b") </div><div>lines(tempo,m3,col="green",type="b")</div><div>lines(tempo, m4,col="black",type="b")</div><div>legend(12.5,85,c("m1","m2","m3","m4"),col=c("blue","red","green","black"),pch=rep(20,2)) </div>
</div><div><br></div><div>No exemplo do help, são três séries em três gráficos empilhados.<br></div><div>Há possibilidade de acrescentar linhas a cada uma das séries, ou seja, em cada um dos três gráficos empilhados ter quatro linhas?</div>
<div>Grato,</div></div><div>Maurício</div></div>