Hello R gurus,

I have a simple routine using for loops that i was just trying to make it
faster

y <- rnorm(10)
Nindiv <- 10
x <-matrix(sample(c(0:2),50,re = T),10)
gtemp <- rnorm(10)
ycorr <- array(0,c(Nindiv,1))
for (i in 1:Nindiv) {
        for (k in 1:ncol(x)) {
                ycorr[i] <- y[i] - x[i,k]*gtemp[k]
        }
}

It works fine but I wanted to make it faster and I think an apply function
could probably solve this problem.
Any suggestions? Thanks

--
View this message in context: 
http://r.789695.n4.nabble.com/Help-with-apply-tp3518773p3518773.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