# NOT RUN {
grp <- factor(rep(LETTERS[c(3,1,4)], c(2,3,3)))
dat1 <- matrix(1:15, ncol=5, dimnames=list(NULL,c("D","A","C","E","B")))
corColumnOrder(dat1,sampNames=LETTERS[1:5])
dat1 <- list(quant=dat1,raw=dat1)
dat1
corColumnOrder(dat1,sampNames=LETTERS[1:5])
# }
Run the code above in your browser using DataLab