前一组的最后一次观察
前一组的最后一次观察
提问于 2020-01-28 00:09:27
我想知道，如果我有可以按变量分组的数据，我如何获得前一组的最后观察结果？
我有以下数据：
dt <- data.table(a=c(1,1,1,2,2,2,2,2,3,3,3,3,3,3,4,4,5,5,5,5,5), b=sample.int(21))我想创建一个新的data.table，它具有组ID以及该组的最后一次观察与前一组的最后一次观察之间的差异。因此，从上面的内容我可以得到：
a c
1: 1 NA
2: 2 9
3: 3 1
4: 4 -8
5: 5 5谢谢!
回答 2
Stack Overflow用户
回答已采纳
发布于 2020-01-28 00:10:58
我们按'a‘分组，获取'b’的last元素，然后通过shifting获取'c‘的lag
dt[, .(c = last(b)), a][, c:= shift(c)][]Stack Overflow用户
发布于 2020-01-28 01:06:36
以下是一种方法：
dt[, c := b * (1:.N == .N), by = a] ## get last row within the group
dt <- dt[b == c] ## filter data.table to get rows of interest
dt[, c := shift(c, type = "lag") - c][] ## getting difference using shift with lag argument
# a b c
#1: 1 11 NA
#2: 2 10 NA
#3: 3 18 9
#4: 4 19 -7
#5: 5 12 -8数据
set.seed(1)
dt <- data.table(a=c(1,1,1,2,2,2,2,2,3,3,3,3,3,3,4,4,5,5,5,5,5), b=sample.int(21))页面原文内容由Stack Overflow提供。腾讯云小微IT领域专用引擎提供翻译支持
原文链接：
https://stackoverflow.com/questions/59934843
复制相关文章
相似问题
腾讯云开发者
