tanu/mosaic_2020
1
0
Fork 0
Code Issues Pull requests Releases Wiki Activity

separated clinical data processing from reg

Browse source
This commit is contained in:
Tanushree Tunstall 2020-11-18 16:00:26 +00:00
parent 9dbad32504
commit bb6e92fa0f
2 changed files with 133 additions and 122 deletions
Download patch file Download diff file Expand all files Collapse all files

8
read_data.R
View file

@ -50,9 +50,9 @@ metadata_all = all_df[, meta_data_cols]
adult_df = all_df[all_df$age>=18,]
if (table(adult_df$adult == 1)[[1]] == nrow(adult_df) ){
cat ("PASS: adult df extracted successfully")
cat ("\nPASS: adult df extracted successfully")
} else{
cat ("FAIL: adult df number mismatch!")
cat ("\nFAIL: adult df number mismatch!")
}
#==============
@ -62,9 +62,9 @@ if (table(adult_df$adult == 1)[[1]] == nrow(adult_df) ){
fp_adults = adult_df[adult_df$flustat == 1,]
if (table(fp_adults$flustat == 1)[[1]] == nrow(fp_adults) ){
cat ("PASS: adult df extracted successfully")
cat ("\nPASS: adult df extracted successfully")
} else{
cat ("FAIL: adult df number mismatch!")
cat ("\nFAIL: adult df number mismatch!")
}
#============