Это мои данные:
dt <- data.table(id=c("a","a","a","a","b","b"), monthsinarrears=c(0,1,0,0,1,0), date=c(2013,2014,2015,2016,2014,2015))
Таблица выглядит так:
> dt
id monthsinarrears date
1: a 0 2013
2: a 1 2014
3: a 0 2015
4: a 0 2016
5: b 1 2014
6: b 0 2015
Теперь я хочу создать дополнительный столбец под названием "EverinArrears", который будет присваиваться "1", если идентификатор всегда имел задолженность (исторически) и "0", если это не так. Таким образом, я хочу получить результат:
id monthsinarrears date EverinArrears
1: a 0 2013 0
2: a 1 2014 1
3: a 0 2015 1
4: a 0 2016 1
5: b 1 2014 1
6: b 0 2015 1
Обратите внимание, что идентификатор кредита a
не был исторически в Задолженности в 2013 году (это произошло в 2014 году), так что почему EverinArrears также получает нуль в 2013 году.