Я использовал следующий код для анализа временного ряда
require(tidyverse)
require(forecast)
frame <- scan("http://robjhyndman.com/tsdldata/data/fancy.dat") %>%
ts(frequency = 12, start = c(1987, 12))
frame_auto_differentiated <- diff(diff(frame, lag = 12))
ggAcf(frame_auto_differentiated, type = 'correlation')
acf(frame_auto_differentiated)
и получил следующий результат:
Есть ли аргумент, который я должен изменить? Я верю, что функция acf дает правильный результат.