Simplify for loop

Question

I have two arrays out and res and c a number. I have this code :

for(i in 1:N) {
    out[i] <- c - sum(res[1:i]) / i 
}

Is is possible to simplify this code in a single line, something like this :

out = c - sum(res[1: ???] / i

https://stackoverflow.com/questions/5963269/how-to-make-a-great-r-reproducible-example — s_baldur, Dec 05 '18 at 08:00

score 1 · Answer 1 · answered Dec 04 '18 at 14:14

1

Do you mean something like c-cumsum(res)/1:length(res)?

answered Dec 04 '18 at 14:14

user2974951

score 0 · Answer 2 · edited Dec 04 '18 at 17:06

0

You can vectorise this with sapply().

out <- sapply(1:length(res), function(x) c - mean(res[1:x]))

edited Dec 04 '18 at 17:06

Joe

answered Dec 04 '18 at 14:25

NRLP

2 Answers2