Vejam pelo lado positivo, de que a R-BR está mais popular que o google!<br><br><div class="gmail_quote">Em 7 de maio de 2012 21:29, Sérgio Henrique almeida da silva ju <span dir="ltr"><<a href="mailto:sergio.edfisica@gmail.com" target="_blank">sergio.edfisica@gmail.com</a>></span> escreveu:<br>
<blockquote class="gmail_quote" style="margin:0 0 0 .8ex;border-left:1px #ccc solid;padding-left:1ex">Rsrsrsrsrs!<br>
<br>
Muito bom Benilton!<br>
<br>
Muito obrigado.<br>
<br>
Em 7 de maio de 2012 21:20, Benilton Carvalho<br>
<<a href="mailto:beniltoncarvalho@gmail.com">beniltoncarvalho@gmail.com</a>> escreveu:<br>
<div class="HOEnZb"><div class="h5">> <a href="http://lmgtfy.com/?q=plotar+%22mesmo+grafico%22+%22r-br%22" target="_blank">http://lmgtfy.com/?q=plotar+%22mesmo+grafico%22+%22r-br%22</a><br>
><br>
> 2012/5/7 Sérgio Henrique almeida da silva ju <<a href="mailto:sergio.edfisica@gmail.com">sergio.edfisica@gmail.com</a>>:<br>
>> Olá<br>
>><br>
>> Como posso plotar uma série em um mesmo gráfico? Ou seja, eu gostaria<br>
>> de plotar a série de PE, AL e SP em um mesmo gráfico.<br>
>><br>
>> A unica coisa que consegui até agora foi:<br>
>><br>
>> PE.ts <- ts(dados[,2], start = 2001, end=2009, freq = 1)<br>
>> AL.ts <- ts(dados[,3], start = 2001, end=2009, freq = 1)<br>
>> SP.ts <- ts(dados[,4], start = 2001, end=2009, freq = 1)<br>
>><br>
>> layout(1:3)<br>
>><br>
>> plot(PE.ts,col="green",lwd=3,xlab="Ano")<br>
>> plot(AL.ts,col="green",lwd=3,xlab="Ano")<br>
>> plot(SP.ts,col="green",lwd=3,xlab="Ano")<br>
>><br>
>> Porém eu gostaria de que as linhas estivessem em um mesmo gráfico<br>
>><br>
>>> dput(dados)<br>
>> structure(list(ano = c(2001L, 2002L, 2003L, 2004L, 2005L, 2006L,<br>
>> 2007L, 2008L, 2009L, 2001L, 2002L, 2003L, 2004L, 2005L, 2006L,<br>
>> 2007L, 2008L, 2009L), PE = c(201L, 191L, 240L, 271L, 275L, 289L,<br>
>> 284L, 288L, 254L, 8735L, 9944L, 9533L, 4570L, 5106L, 4461L, 4107L,<br>
>> 2386L, 1114L), AL = c(216L, 260L, 62L, 56L, 71L, 60L, 82L, 61L,<br>
>> 69L, 497L, 1595L, 349L, 282L, 268L, 300L, 166L, 104L, 33L), SP = c(144L,<br>
>> 107L, 113L, 142L, 112L, 124L, 114L, 112L, 125L, 4189L, 2787L,<br>
>> 2738L, 2247L, 1778L, 1144L, 1549L, 1197L, 1147L), tipo = structure(c(1L,<br>
>> 1L, 1L, 1L, 1L, 1L, 1L, 1L, 1L, 2L, 2L, 2L, 2L, 2L, 2L, 2L, 2L,<br>
>> 2L), .Label = c("SIM", "SINAN"), class = "factor")), .Names = c("ano",<br>
>> "PE", "AL", "SP", "tipo"), class = "data.frame", row.names = c(NA,<br>
>> -18L))<br>
>><br>
>> Abraços<br>
>><br>
>> --<br>
>> Sérgio Henrique Almeida da Silva Junior<br>
>> Doutorando em Epidemiologia em Saúde Pública<br>
>> Escola Nacional de Saúde Pública Sérgio Arouca - ENSP/FIOCRUZ<br>
>> <a href="http://lattes.cnpq.br/1611345552843383" target="_blank">http://lattes.cnpq.br/1611345552843383</a><br>
>> Tel: (21) 94429486/78101651 id: 123*20942<br>
>> _______________________________________________<br>
>> R-br mailing list<br>
>> <a href="mailto:R-br@listas.c3sl.ufpr.br">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>
> R-br mailing list<br>
> <a href="mailto:R-br@listas.c3sl.ufpr.br">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>
<br>
<br>
--<br>
Sérgio Henrique Almeida da Silva Junior<br>
Doutorando em Epidemiologia em Saúde Pública<br>
Escola Nacional de Saúde Pública Sérgio Arouca - ENSP/FIOCRUZ<br>
<a href="http://lattes.cnpq.br/1611345552843383" target="_blank">http://lattes.cnpq.br/1611345552843383</a><br>
Tel: (21) 94429486/78101651 id: 123*20942<br>
_______________________________________________<br>
R-br mailing list<br>
<a href="mailto:R-br@listas.c3sl.ufpr.br">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>
</div></div></blockquote></div><br><br clear="all"><br>-- <br>Fernando A.B. Colugnati<br><br><br>