Dear R Users,

at the moment I am trying to optimize an R script.

testvec <- c(0,1,0,1,1,1,1,0,0,1,0,1,0)


sum.testvec <- vector()
tempsum <- 1
for (e in 1:length(testvec)){
sum.testvec[e] <- tempsum+testvec[e]
tempsum <- sum.testvec[e]

}

final.sum <- c(1,sum.testvec)


Is there an option to do something with apply? Unfortunately I am not so
familiar with the apply functions.

Thanks.

--
View this message in context: 
http://r.789695.n4.nabble.com/optimize-R-code-replace-for-loop-tp3873945p3873945.html
Sent from the R help mailing list archive at Nabble.com.

______________________________________________
R-help@r-project.org mailing list
https://stat.ethz.ch/mailman/listinfo/r-help
PLEASE do read the posting guide http://www.R-project.org/posting-guide.html
and provide commented, minimal, self-contained, reproducible code.

Reply via email to