jsauer/secmalasct
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

utils: Condense Ewing sarcoma

Browse Source 
Condense Ewing Sarcoma with Ewing Sarcoma / PNET due to a inconsistency
in data mining.
This commit is contained in:
Jens Sauer 2021-01-17 11:33:41 +01:00
parent b3ef8086ec
commit 3e263bb400
1 changed files with 3 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
utils.R
View File

@ -81,6 +81,9 @@ sma_load_data <- function(file) {
# At this time only solid tumors are important # At this time only solid tumors are important
sma <- filter(sma, diagnosis_type == "solid") sma <- filter(sma, diagnosis_type == "solid")
# Condense 'Ewing Sarcom'
levels(sma$diagnosis)[match("Ewing sarcoma", levels(sma$diagnosis))] <- "Ewing sarcoma / PNET"
# After filtering unused levels must be cleared from the data # After filtering unused levels must be cleared from the data
sma <- droplevels(sma) sma <- droplevels(sma)