消除R中时间序列数据的波动

Question

如何消除R？

中二进制时间序列数据的波动

e.g。这个是带有波动的时间序列数据的图表  

现在，如果我下采样或使用SMA，该系列将变为非二进制，并且很难确定实际事件的确切点。

如果上述情况令人困惑，我正在寻找改变系列的方法 c(0,0,0,0,1,1,1,1,1,1,1,0,1,1,0,1,1,1,0,0,0,0,0,0,0,0,0,0)来 c(0,0,0,0,1,1,1,1,1,1,1,1,1,1,1,1,1,1,0,0,0,0,0,0,0,0,0,0)