（1）做一个个回归 Y=X1+X2+X3
X2=X2(t-1)+X3(t-1)+X1(t-1)+e1(误差项)
如何写命令使得右侧所有非误差项都滞后一期,并提取出误差项e1
（2）再做Y=X1(t-1)+X2(t-1)+X3(t-1)+e1(t-1)+e2(误差项)
我用lag(Xi,1)命令后是得到了e1,但在第二部的时候报错说面板
Error in data.frame(..., check.names = FALSE) :
  参数值意味着不同的行数: 630, 620
就是e1的行数变少了