result <- cbind(maM(marrayNorm)[, 1] + maM(marrayNorm)[, 2], maM(marrayNorm)[, 3] + maM(marrayNorm)[, 4], maM(marrayNorm)[, 5] + maM(marrayNorm)[, 6], maM(marrayNorm)[, 7] + maM(marrayNorm)[, 8], maM(marrayNorm)[, 9] + maM(marrayNorm)[, 10], maM(marrayNorm)[, 11] + maM(marrayNorm)[, 12])
source share