Displaying 1 result from an estimated 1 matches for "tp4651030".
2012 Nov 27
1
code optimisation problem
...length(v)
z <- (n-k+1)
for (i in k:n) {
v[i-k+1] <- sum(v[(i-k+1):i])
}
v <- v[1:(n-k+1)]
v <- v/k
return (v)
}
<http://r.789695.n4.nabble.com/file/n4651030/Untitled.png>
--
View this message in context: http://r.789695.n4.nabble.com/code-optimisation-problem-tp4651030.html
Sent from the R help mailing list archive at Nabble.com.