Moving average plot r

Eu tenho um enredo da série temporal no pacote ggplot2 e realizei a média móvel e gostaria de adicionar o resultado da média móvel ao gráfico da série temporal. Amostra do Conjunto de Dados (p31): ambtemp dt -1.14 2007-09-29 00:01:57 -1.12 2007-09-29 00:03:57 -1.33 2007-09-29 00:05:57 -1.44 2007 -09-29 00:07:57 -1.54 2007-09-29 00:09:57 -1.29 2007-09-29 00:11:57 Código aplicado para apresentação de séries temporais: Amostra de plotagem média móvel Amostra de resultados esperados O desafio é que os dados da série temporal obtidos do conjunto de dados incluem timestamps e temperatura, mas os dados da média móvel incluem apenas a coluna média e não os registros de data e hora e a adaptação desses dois pode causar inconsistência. Mover Médias em R não tem uma função interna para calcular médias móveis. Usando a função de filtro, no entanto, podemos escrever uma função curta para médias móveis: Podemos usar a função em qualquer dado: mav (data), ou mav (data, 11) se quisermos especificar um número diferente de pontos de dados do que o padrão 5 plotagem funciona conforme o esperado: plot (mav (data)). Além do número de pontos de dados sobre os quais calcular a média, também podemos alterar o argumento dos lados das funções de filtro: sides2 usa ambos os lados, sides1 usa apenas valores passados. Compartilhe isso: Navegar por postar Comentar navegação Comentar navigationPlotando Múltiplas Séries em R - Parte 4 de uma Série Este é o post 04 de uma série em execução sobre plotagem em R. Freqüentemente, você quer plotar simultaneamente várias séries no mesmo enredo. Letrsquos tentar traçar observações diárias, juntamente com uma média móvel de 30 dias. Para começar, tenho observações para as ações da YHOO de 12 de abril de 1996 a 2 de julho de 2009. Primeiro, os dados precisam de limpeza - ligo os nomes das colunas em letras minúsculas por conveniência com a função tolower e transformo as datas do texto formatadas como aaaa-mm - dd em datas em vez de fatores através do construtor as. Date para classes Date: Agora, letrsquos dar uma primeira passagem na plotagem: Isso não é muito bonito, não menos do que porque wersquore exibindo muitos dados para ser útil. Letrsquos reduziu a apenas os dados de 1 de janeiro de 2008 e em: Itrsquos vale a pena ressaltar que o código de plotagem Rrsquos tentará definir os limites y superior e inferior para algo razoável com base nos dados que você apresentá-lo. No entanto, às vezes, particularmente para ter uma noção de escala, você realmente quer ver toda a gama. Você pode fazer isso definindo explicitamente os limites do eixo y com ylim. Eu também faço os dados mais apresentáveis. Além disso, desejo traçar a média móvel, então eu crio a função ma30 para calculá-la. Eu também adiciono o ma30 como uma coluna, usando toda a faixa de dados para que a média móvel esteja correta no início do nosso subconjunto: E finalmente, eu replico os dados, adicionando a média móvel como uma segunda série e tornando-a um pouco mais ousada (lwd2 ) para enfatizar a média móvel sobre as observações diárias: Posts recentes