基于R中条件的窗口（或运行窗口总和）中的累积和

I am trying to calculate cumulative sum for a given window based on a condition. I have seen threads where the solution does conditional cumulative sum (I am trying to calculate cumulative sum for a g