Olá Walmes, Eu pensei em enviar os códigos e dados por achar melhor a visualização. O que eu fiz foi gerar os resultados das etp0, etp_1 e etp_2. Pegando uma linha que representa um determinado ano tento plotar com um vetor de strings dos meses do ano, porém o resultado não é o desejado, assim como o meu desconhecimento de como por duas curvas num mesmo gráfico. Espero que possa me ajudar! Grande abraço. Paulo Henrique Pimenta Graduando em Meteorologia - IAG USP Celular/WhatsApp/Telegram: +5511981418435 Este email foi enviado de um telemóvel Samsung Galaxy S5 mini Obter o Outlook para Android On Fri, Oct 28, 2016 at 8:20 PM -0200, "Walmes Zeviani" <walmeszeviani@gmail.com<mailto:walmeszeviani@gmail.com>> wrote: Paulo, Você consegue gerar um exemplo reproduzível com uma serie de 10 valores que você pode colocar na própria mensagem de email? # Gerando uma sequência diária de tamanho 100 a partir de hoje. x <- Sys.Date() x <- seq(x, x + 100, by = "1 day") # Gerando um vetor de números aleatórios normais (ruído branco). y <- rnorm(length(x)) library(lattice) class(x) class(y) # Gráfico da série. xyplot(y ~ x, type = "l") À disposição. Walmes. ?