有条件的时差

Question

我对变量g进行了小组年度观察（t，x）。我想在x进行观察的条件下计算t-(t-1) t+1分组的第一个差异。

也就是说，如果我的数据是

  t  x  g
  1  1  1 
  2  2  1 
  3  2  1 
  1  1  2 
  2  10 2

简单的第一个差异dt[by=list(t, g), order(t), list(t=t[-1], diff=(x))]会给我一些

的内容

 t  x  g
 2  1  1
 3  0  1 
 2  9  2 

但是，由于我们g=1没有对t=4的观察，g=2没有对t=3的观察，我的条件差异（因此期望）输出）是

 t  x  g
 2  1  1

如何使用r和data.table有效实现这一目标？