Series de tiempo en R studio, Descomposición y predicción de Holt-Winters

Recomiendo ver el video a una velocidad de 1.5x o 1.25x porque parece la mañanera. Para los gráficos de las descomposición en factores estacionales, aleatorios y tendencia en R:
plot(decompose(inventado)); usando el ejemplo del video.
Recuerde que inventado es el nombre que le di al objeto "serie de tiempo" .