
# NOT RUN {
data(scores);
tmpdir <- paste0(tempdir(),"/");
save(S, file=paste0(tmpdir,"scores.rda"));
flat.dir <- flat.norm.dir <- tmpdir;
norm.types <- c("MaxNorm","Qnorm");
for(norm.type in norm.types){
Do.flat.scores.normalization(norm.type=norm.type, flat.file="scores",
flat.dir=flat.dir, flat.norm.dir=flat.norm.dir);
}
# }
Run the code above in your browser using DataLab