создание лагов для объектов зоопарка

Question

Я создаю лаги для объектов зоопарка, используя следующее econ$gdp4 <- lag(econ$gdp, k = -4, na.pad = TRUE).У меня есть около 6 столбцов в econ объекте, для которого я хочу создать лаги, и я хочу создать лаги для периодов с 1 по 9. Есть ли способ использовать цикл для их создания?

Answer 1

Предположим, z - это наш зоопарк. Допустим, нам нужно 9 лагов для каждого из столбцов 2, 3, 4, а также для всех столбцов оригинала. Тогда попробуйте:

merge(z, lag(z[, 2:4], -(1:9)))

Также обратите внимание, что задержка 0 возвращает тот же столбец, так что это дает оригинал, а также 9 лагов каждого столбца:

lag(z, -(0:9))