R Создайте копию столбца, в котором новый столбец смещен на некоторое фиксированное значение.

Question

Я ищу, чтобы создать копию существующего столбца в кадре данных, который смещен на количество строк.

например. если column2 является копией column1 со смещением на 1, то

> dataframe
$column1
[1] 1 2 3 4 5

$column2
[1] 0 1 2 3 4

У меня был некоторый успех со следующим кодом:

offset7 <- rep(0, 7)
dataframe$column1.prev7 = c(offset7, dataframe$column1[1:(length(dataframe$column1)-7)])

Однако он начинает выдавать ошибки, если я смещен на 30 или более. Мои данные достаточно длинные, чтобы не было проблемы смещения больше, чем количество строк. Ошибка:

Error in dataframe$column1[1:(length(dataframe$column1) - 30)] : 
  only 0's may be mixed with negative subscripts

Заранее спасибо! Предпочтительна быстрая версия без петель, которая хорошо работает с plyr. Намерение здесь состоит в том, чтобы разбить данные временных рядов на различные задержки до года, а затем проанализировать результаты различными способами.

Answer 1

Пожалуйста, используйте подходящий класс временных рядов для операций временных рядов. Популярные фавориты: зоопарк и хтс , каждый из которых имеет множество документации.

В качестве простого примера рассмотрим

> library(xts)
> foo <- xts(100:109, order.by=Sys.Date()+0:9)
> merge(foo,  l1=lag(foo,1), lm1=lag(foo,-1))
           foo  l1 lm1
2010-11-18 100  NA 101
2010-11-19 101 100 102
2010-11-20 102 101 103
2010-11-21 103 102 104
2010-11-22 104 103 105
2010-11-23 105 104 106
2010-11-24 106 105 107
2010-11-25 107 106 108
2010-11-26 108 107 109
2010-11-27 109 108  NA
> 

Но только не делайте этого вручную. И найдите здесь «[r] xts» или [r] zoo »для поиска по тегу R.