Sean Davis wrote:

I have vector X of length N that I want to have a running sum for (called Y). I just need max(Y). I do this with a "for" loop like so:

    Y <- vector(length=N)
    Y[1] <- X[1]
    for (i in 2:N) {
      Y[i] <- Y[i-1]+X[i]
    }
    return(max(Y))

Is there a faster way to do this?


max(cumsum(Y))

Kjetil


Thanks, Sean

______________________________________________
[EMAIL PROTECTED] mailing list
https://stat.ethz.ch/mailman/listinfo/r-help
PLEASE do read the posting guide! http://www.R-project.org/posting-guide.html





--

Kjetil Halvorsen.

Peace is the most effective weapon of mass construction.
              --  Mahdi Elmandjra

______________________________________________
[EMAIL PROTECTED] mailing list
https://stat.ethz.ch/mailman/listinfo/r-help
PLEASE do read the posting guide! http://www.R-project.org/posting-guide.html

Reply via email to