Aplicar em janela móvel com função personalizada

A função rollapply do pacote zoo permite aplicar qualquer função de resumo a uma janela móvel. Uma função de resumo recebe vários números como entrada e retorna um único número, como mean(), max(), sum(), etc.

Dependendo do tipo de dado, você pode precisar escrever uma função que combine várias estatísticas, como no exemplo da nossa função find_range() no exercício em vídeo.

Neste exercício, você vai criar uma função simples que calcula “manualmente” o valor médio de um conjunto de números e aplicá-la a uma janela móvel.

O conjunto de dados com que você vai trabalhar, daily_temp, e os pacotes zoo e ggplot2 já estão carregados para você.