inst/extdata/k_selection_heatmap/extract_measures.R

lapply(0:600,
       function(x) {
           print(x)
           load(paste("nmf_result",x,sep=""))
           measures <- nmf_result$measures
           save(measures,file=paste("measures",x,sep=""))
       }
)
MollahLab/gen3DNet documentation built on Nov. 18, 2024, 5:08 a.m.