dissTOM = 1-TOMsimilarityFromExpr(datExpr, power = sft$powerEstimate) plotTOM = dissTOM^7 diag(plotTOM) = NA TOMplot(plotTOM, geneTree, moduleColors, main = "Network heatmap plot, all genes") nSelect = 400 set.seed(10); select = sample(nGenes, size = nSelect); selectTOM = dissTOM[select, sele...
回答于 2019-11-20 01:28