This commit is contained in:
Tanushree Tunstall 2020-11-19 15:39:18 +00:00
parent c5529206d9
commit 46575c657f
2 changed files with 8 additions and 2 deletions

View file

@ -49,6 +49,12 @@ gathercols <- c("age", "los", "onset2final", "onsfindeath", "onset_2_initial", "
clinical_lf = gather_(clinical_df_numerical, keycol, valuecol, gathercols)
if( nrow(clinical_lf) == expected_rows_clinical_lf){
cat("PASS: long format data created successfully"
, "\nnrow:", nrow(clinical_lf)
, "\nncol:", ncol(clinical_lf))
}
#====================
# unpaired: clinical
#====================