Skip to content

Instantly share code, notes, and snippets.

Embed
What would you like to do?
information gain for RTCGA BRCA
library(devtools)
devtools::install_github('RTCGA/RTCGA')
library(RTCGA)
installTCGA('RTCGA.clinical')
installTCGA('RTCGA.rnaseq')
library(RTCGA.rnaseq)
library(RTCGA.clinical)
library(dplyr)
survivalTCGA(BRCA.clinical) %>%
left_join(
BRCA.rnaseq %>%
mutate(
bcr_patient_barcode =
substr(bcr_patient_barcode, 1, 12)
),
by = "bcr_patient_barcode") -> BRCA.rnaseq_and_status
#status BRCA.rnaseq_and_status$patient.vital_status
library(FSelector)
information.gain(patient.vital_status~., data = BRCA.rnaseq_and_status)
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment