Displaying 1 result from an estimated 1 matches for "newlinewhendon".
Did you mean:
newlinewhendone
2010 Nov 17
1
efficient conversion of matrix column rows to list elements
...s of a single list. Any constructive suggestions will be greatly
appreciated. Thanks for your consideration,
C
code:
------------
unionIndependant <- function(outcomes) {
intsctn <- c()
column2list <- function(x){list(x)}
pb <-
ProgressBar(max=length(outcomes),stepLength=1,newlineWhenDone=TRUE)
for (i in 2:length(outcomes)){
increase(pb)
outcomes_ <- apply(combn(outcomes,i),2,column2list)
for (j in 1:length(outcomes_)){outcomes_[[j]] <-
outcomes_[[j]][[1]]}
outcomes_container <- mclapply(outcomes_,prod,mc.cores=3)
intsctn[i] <...