Nothing
Tmean.Null.Tss2 <-
function(gnames, null.Z, multiplier=30){
multi.sim=NULL
for (k in 1:multiplier){
resampled.Z = sample(null.Z, size=length(gnames), replace=FALSE)
re.geneZ = cbind(gnames, resampled.Z)
sim.Txx = T.mean(geneZ=re.geneZ)
multi.sim = rbind(multi.sim, sim.Txx)
}
return(multi.sim)
}
Any scripts or data that you put into this service are public.
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.