title: resetting cumsum if value goes to negative in r
body: <pre><code>ve &lt;- c(17, -9, 9, -17, 17, -17, 11, -9, 16, -18, 17, 0, 0, -18, 17, 0, 0, -17, 14, -14, 17, -2, 0, -15, 9, -9, 17, -16, 16, -17, 17, -17, 17, -17, 17, -17, 17, -8, 7, -16, 17, -14, 14, -10, 10, -16, 16, -10, 10, -12, 12, -11, 11, -17, 17, -17, 17, -9, 8, -17, 17, -17, 17, -16, 16, -17, 17, -8, 8, -9, 9, -17, 17, -17, 17, -13, 13, -10, 7, -10, 13, -16, 17, -13, 13, -13, 13, -9, 8, -17, 17, -10, 9, -17, 17, -17, 17, -16, 16, -10, 10, -15, 15, -14, 14, -14, 15, -13, 13, -9, 9, -13, 13, -12, 12, -10, 9, -11, 12, -8, 7, -10, 10, -9, 9, -11, 11, -9, 9, -7, 7, -12, 11, -11, 12, -11, 11, -14, 14, -13, 13, -10, 10, -13, 13, -17, 17, -7, 7, -17, 17, -17, 17, -14, 14, NA)
  
  df &lt;- data.frame(ve = ve, calc = 0)
  </code></pre>
  
  <p>I need to calculate cumsum in column calc, but it needs to reset to zero and start again whenever its value goes negative..
  I've tried several conditions but it's not really working...</p>
  
  <p>Also, is it possible to achieve this in dplyr? I'm new to dplyr and find it somewhat difficult whenever I need to use dependent value..</p>
  
  <p>Thank you for your help!</p>
  
  <p>it should go as..</p>
  
  <pre><code>     ve calc
  1    17    17
  2    -9    8
  3     9    17
  4   -17    0
  5    17    17
  6   -17    0
  7    11    11
  8    -9    2
  9    16    18
  10  -18    0
  11   17    17
  12    0    17
  13    0    17
  14  -18    0
  15   17    17
  </code></pre>
  
  <p>If you see row 14 and 15, with the normal cumsum it would be -1 and 16
  but I want it to reset to 0 instead of -1 and continue cumsum, hence the next would be 17</p>