## get the prepared and KDA applied dataset:(see kda.analyze for details)
data(job_kda_analyze)
## finish the KDA process by estimating additional measures for the modules
## such as module sizes, overlaps with hub neighborhoods, etc.
# job.kda <- kda.finish(job.kda)
# if (nrow(job.kda$results)==0){
# cat("No Key Driver Found!!!!")
# } else{
## Estimate additional measures - see kda.analyze and kda.finish for details
# res <- kda.finish.estimate(job.kda)
## Save full results about modules such as co-hub, nodes, P-values info etc.
# res <- kda.finish.save(res, job.kda)
## Create a simpler file for viewing by trimming floating numbers
# res <- kda.finish.trim(res, job.kda)
# }
## See kda.analyze() and kda.finish() for details
Run the code above in your browser using DataLab