Am 05.02.2012 15:54, schrieb Alaios:
Dear all
I am using lapply (actually mclapply that share the same syntax).
I want to call the same function that takes as input a vector. My initial data
structure is a matrix that I want to cut it to multiple vectors (one vector for
every row of the matrix) and then feed that to the function by using mclapply.
Could you please help me converting the matrices to nrow times vectors.
I would like to thank you in advance for your help
Regards
Alex
Hi Alex,
I don't know exactly what you mean. A small example would be helpfull.
But how I understand you, you have different choices:
let x be a matrix
x <- matrix(rnorm(24, 10,5), nrow=6)
you could
1. cut the matrix in a list of vectors (xi)
xi <- list()
for (i in 1:length(x[,1])) xi[[i]] <- x[i,]
lapply(xi, function(f) f/5)
2. use lapply in a loop
y <- list()
for (i in 1:length(x[,1])) y[[i]] <- lapply(x[i,], function (f) f/5)
3. use lapply in this way
lapply(x[1:length(x[,1]),], function (f) f/5)
or
4. combine the apply with the lapply function
apply(x,1,function(f) {
lapply(f, function (g) g/5)
})
Hope something like this is what you wanted.
Best wishes, Christian
______________________________________________
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.
