R: Lag возвращает ввод

Question

Например, если я использую lag(c(1:10), k = 1), он возвращает 1, 2, ..., 10. Как мне заставить эту функцию работать вообще? Я попытался просмотреть документацию, но все, что я там пробовал, тоже не сработало.

Answer 1

Вы уже работаете, но это не очевидно с первого взгляда:

(x <- lag(1:10, k = 1))
#[1]  1  2  3  4  5  6  7  8  9 10
#attr(,"tsp")
#[1] 0 9 1
?tsp
#..The tsp attribute gives the start time in time units, the end time and the frequency
#(the number of observations per unit of time, e.g. 12 for a monthly series)...
#...See Also: ts, time, start...
?time
#...time creates the vector of times at which a time series was sampled...
time(x)
#[1] 0 1 2 3 4 5 6 7 8 9
#attr(,"tsp")
#[1] 0 9 1
as.numeric(time(x))
#[1] 0 1 2 3 4 5 6 7 8 9

Answer 2

Несколько пакетов предлагают ряд функций lag. Убедитесь, что тот, который вы применяете, прибывает из правильного пакетаПримеры ниже:

Использование lag из stats:

> stats::lag(c(1:10), k = 1)
 [1]  1  2  3  4  5  6  7  8  9 10
attr(,"tsp")
[1] 0 9 1

Эта функция lag из stats предназначена для применения к объекту временного ряда, а не кчисловой вектор.

Использование lag из dplyr:

> dplyr::lag(c(1:10))
 [1] NA  1  2  3  4  5  6  7  8  9