data(braingraphs)
grps <- c(rep(0, 19), rep(1, 19))
iters <- 1 ### This is set low for speed
nRuns <- 1 ### This is set low for speed
consensus <- gaConsensus(braingraphs, grps, iters, nRuns)
consensus$corr[1:5]
consensus$solutions[1:2,]
Run the code above in your browser using DataLab