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