回归时间序列事件r

我的时间序列如下所示：

  year         a        b    event         x
1 1950  0.033222        2        0  1055.461
2 1950  0.033222      345        0  1055.461
3 1950  0.033222      290        0  1055.461
4 1950  0.033222      355        0  1055.461
5 1950  0.033222      710        1  1055.461
6 1950  0.033222       36        0  1055.461

我想知道当虚拟变量“event”变为1时，随着时间的推移x会发生什么变化。此外，我想知道30年来的影响。所以我的问题是，可能还有其他的1会在12年或21年后出现。我如何控制单个事件或考虑30年内可能发生的所有事件

我想要一些类似于：

lm（x~事件，数据=数据）

其中x为t年，事件为前30年发生的所有事件

---

我想使用

VAR

包，但我不知道如何在它们的函数中添加一个虚拟值。

请提供，以及预期的输出。我做到了，这样更好吗？