Funkcja rozkładu w R

decompose(x, type = c("additive", "multiplicative"), filter = NULL)
Rocku0