# \donttest{
DGSA_obj <- DGSA(full_data, survival_time, survival_event, case_tag, na.rm = "checked")
geneSelection_object <- geneSelection(DGSA_obj, gen_select_type ="top_bot",
percent_gen_select = 10)# }
Run the code above in your browser using DataLab