Экспоненциальное сглаживание с помощью R в наборах растровых данных
У меня есть временные ряды ежемесячных растровых данных, и я хочу прогнозировать значения будущих месяцев с помощью экспоненциального сглаживания. Например, у меня есть изображения января, февраля и марта для острова (прилагается), и я пытаюсь предсказать значения апреля.
Я применяю алгоритм прогноза (HoltWinters) из библиотеки (прогноз).
Проблема в том, что функция работает вечно, без каких-либо ошибок, и я не получаю вывод. Однако, когда я попытался использовать тестовый растровый файл с 50 строками, 50 столбцами и случайными значениями, все заработало нормально. Я не могу выяснить проблему.
Я использую следующий код:
f = function(x) {
Ltimeseries = ts(x)
Lforecast = HoltWinters(Ltimeseries, beta = FALSE, gamma = FALSE)
fcast = forecast(Lforecast, h = 1)
}
## I stack 3 images
s = stack(image_1, image_2, image_3)
## Then i predict the 4th image
new = overlay(s, f)
Какие-либо предложения? Заранее спасибо, Валантис