require(survJamda.data)
data(gse4335)
data(gse3143)
common.gene = intersect(colnames(gse3143), colnames(gse4335))
m = znorm(rbind(gse3143[,common.gene],gse4335[,common.gene]))
## The function is currently defined as
function(m)
{
m = scale(t(scale(t(m))))
return(m)
}
Run the code above in your browser using DataLab