#plotar nome mês/ano no eixo x

#Saudações a todos, gostaria de plotar a data no eixo x, no formato mmm/aaaa e ocorreu #um erro em plotar2, e em plotar1, só aparece o ano. Poderiam me ajudar? #Código Mínimo Reproduzível abaixo: valor=1:36 data1=seq(as.Date("2010/01/01"), by="month", length.out=36);data1 data2=format(data1, "%b/%Y");data2 plotar1=plot(data1,valor,type="l");plotar1 plotar2=plot(data2,valor,type="l");plotar2 #Muito Obrigado ! #Alexandro

Uma forma de formatar é usar a função axis.POSIX() veja, #------------------------------------------------------------------------------------------ # gráficos de séries no tempo met <- read.table("http://www.leg.ufpr.br/~walmes/data/metereologia.txt", header=TRUE, sep="\t", stringsAsFactors=FALSE) str(met) names(met) <- tolower(names(met)) # passa os nomes para minúsculas #------------------------------------------------------------------------------------------ # conversão com a função as.POSIX* met$data <- as.POSIXct(met$data, format="%Y-%m-%d") plot(temp~data, data=met, type="l", xaxt="n") axis.POSIXct(1, at=seq(as.POSIXct("2009-10-01"), as.POSIXct("2011-10-01"), by="month"), format="%B", col=2) plot(temp~data, data=met, type="l", xaxt="n") axis.POSIXct(1, at=seq(as.POSIXct("2009-10-01"), as.POSIXct("2011-10-01"), by="month"), format="%m/%y", col=2) #------------------------------------------------------------------------------------------ # duas séries em um mesmo gráfico par(mar=c(5.1,4.1,4.1,4.1)) plot(temp~data, data=met, type="l", xaxt="n") par(new=TRUE) plot(urel~data, data=met, type="l", xaxt="n", yaxt="n", ylab=NA, col=2) axis(4, col=2) mtext("urel", side=4, line=3) axis.POSIXct(1, at=seq(as.POSIXct("2009-10-01"), as.POSIXct("2011-10-01"), by="month"), format="%m/%y") À disposição. Walmes. ========================================================================== Walmes Marques Zeviani LEG (Laboratório de Estatística e Geoinformação, 25.450418 S, 49.231759 W) Departamento de Estatística - Universidade Federal do Paraná fone: (+55) 41 3361 3573 VoIP: (3361 3600) 1053 1173 e-mail: walmes@ufpr.br skype: walmeszeviani twitter: @walmeszeviani homepage: http://www.leg.ufpr.br/~walmes linux user number: 531218 ==========================================================================

De uma olhada no pacote zoo Tito Conte On Mon, Jun 24, 2013 at 3:05 PM, walmes . <walmeszeviani@gmail.com> wrote:
Uma forma de formatar é usar a função axis.POSIX() veja,
#------------------------------------------------------------------------------------------ # gráficos de séries no tempo
met <- read.table("http://www.leg.ufpr.br/~walmes/data/metereologia.txt", header=TRUE, sep="\t", stringsAsFactors=FALSE) str(met) names(met) <- tolower(names(met)) # passa os nomes para minúsculas
#------------------------------------------------------------------------------------------ # conversão com a função as.POSIX*
met$data <- as.POSIXct(met$data, format="%Y-%m-%d") plot(temp~data, data=met, type="l", xaxt="n") axis.POSIXct(1, at=seq(as.POSIXct("2009-10-01"), as.POSIXct("2011-10-01"), by="month"), format="%B", col=2)
plot(temp~data, data=met, type="l", xaxt="n") axis.POSIXct(1, at=seq(as.POSIXct("2009-10-01"), as.POSIXct("2011-10-01"), by="month"), format="%m/%y", col=2)
#------------------------------------------------------------------------------------------ # duas séries em um mesmo gráfico
par(mar=c(5.1,4.1,4.1,4.1)) plot(temp~data, data=met, type="l", xaxt="n") par(new=TRUE) plot(urel~data, data=met, type="l", xaxt="n", yaxt="n", ylab=NA, col=2) axis(4, col=2) mtext("urel", side=4, line=3) axis.POSIXct(1, at=seq(as.POSIXct("2009-10-01"), as.POSIXct("2011-10-01"), by="month"), format="%m/%y")
À disposição. Walmes.
========================================================================== Walmes Marques Zeviani LEG (Laboratório de Estatística e Geoinformação, 25.450418 S, 49.231759 W) Departamento de Estatística - Universidade Federal do Paraná fone: (+55) 41 3361 3573 VoIP: (3361 3600) 1053 1173 e-mail: walmes@ufpr.br skype: walmeszeviani twitter: @walmeszeviani homepage: http://www.leg.ufpr.br/~walmes linux user number: 531218 ==========================================================================
_______________________________________________ R-br mailing list R-br@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.

De uma olhada na função epicurve.month do pacote epicalc. La tem alguns exemplos pra isso. Dr. Pedro Emmanuel A. A. do Brasil http://blog.ipec.fiocruz.br/lapclin-chagas/ Curriculum Lattes: http://lattes.cnpq.br/6597654894290806 ResearchGate.net: https://www.researchgate.net/profile/Pedro_Brasil2/ Instituto Nacional de Infectologia/Instituto de Pesquisa Clínica Evandro Chagas Fundação Oswaldo Cruz Rio de Janeiro - Brasil Av. Brasil 4365, CEP 21040-360, Tel 55 21 3865-9648 e-mail: pedro.brasil@ipec.fiocruz.br e-mail: emmanuel.brasil@gmail.com ---Apoio aos softwares livres www.zotero.org - gerenciamento de referências bibliográficas. www.broffice.org ou www.libreoffice.org - textos, planilhas ou apresentações. www.epidata.dk - entrada de dados. www.r-project.org - análise de dados. www.ubuntu.com - sistema operacional Em 24 de junho de 2013 13:43, Alexandro (Yahoo) <vl.alexandro@yahoo.com.br>escreveu:
#Saudações a todos, gostaria de plotar a data no eixo x, no formato mmm/aaaa e ocorreu #um erro em plotar2, e em plotar1, só aparece o ano. Poderiam me ajudar? #Código Mínimo Reproduzível abaixo:
valor=1:36 data1=seq(as.Date("2010/01/01"), by="month", length.out=36);data1 data2=format(data1, "%b/%Y");data2 plotar1=plot(data1,valor,type="l");plotar1 plotar2=plot(data2,valor,type="l");plotar2
#Muito Obrigado ! #Alexandro
_______________________________________________ R-br mailing list R-br@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.
participantes (4)
-
Alexandro (Yahoo)
-
Pedro Emmanuel Alvarenga Americano do Brasil
-
Tito Conte
-
walmes .