## Not run:
# simulation <- init_simulation_gene_net()
# t_data = DNLC_statistics(simulation$gene_graph, simulation$gene_expr,
# simulation$patient_matrix, lmi_data = simulation$lmi_matrix)
# fdr_result <- gene_fdrtest(t_data)
# sig_genes <- significant_genes(fdr_obj = fdr_result, thres = 0.2)## End(Not run)
Run the code above in your browser using DataLab