correcting dtype for sfluv and h1n1v for data formatting clinical
This commit is contained in:
parent
7529549bfc
commit
08e01abfb5
4 changed files with 52 additions and 461 deletions
|
@ -225,36 +225,35 @@ sum(table(clinical_df$onset_initial_bin)) == tot_onset2ini
|
|||
#=======================
|
||||
# seasonal flu: sfluv
|
||||
#=======================
|
||||
if (! is.factor(clinical_df$sfluv)){
|
||||
clinical_df$sfluv = as.factor(clinical_df$sfluv)
|
||||
}
|
||||
class(clinical_df$sfluv)
|
||||
levels(clinical_df$sfluv)
|
||||
# reassign as 0 and 1
|
||||
|
||||
table(clinical_df$sfluv)
|
||||
table(clinical_df$asthma, clinical_df$sfluv)
|
||||
|
||||
# reassign
|
||||
levels(clinical_df$sfluv) <- c("0", "0", "1")
|
||||
clinical_df$sfluv = ifelse(clinical_df$sfluv == "yes", 1, 0)
|
||||
table(clinical_df$sfluv)
|
||||
table(clinical_df$asthma, clinical_df$sfluv)
|
||||
|
||||
# convert to integer
|
||||
str(clinical_df$sfluv)
|
||||
clinical_df$sfluv = as.integer(clinical_df$sfluv)
|
||||
str(clinical_df$sfluv)
|
||||
|
||||
#=======================
|
||||
# h1n1v
|
||||
#=======================
|
||||
if (! is.factor(clinical_df$h1n1v)){
|
||||
clinical_df$h1n1v = as.factor(clinical_df$h1n1v)
|
||||
}
|
||||
|
||||
class(clinical_df$h1n1v)
|
||||
levels(clinical_df$h1n1v)
|
||||
# reassign as 0 and 1
|
||||
|
||||
table(clinical_df$h1n1v)
|
||||
table(clinical_df$asthma, clinical_df$h1n1v)
|
||||
|
||||
# reassign
|
||||
levels(clinical_df$h1n1v) <- c("0", "0", "1")
|
||||
clinical_df$h1n1v = ifelse(clinical_df$h1n1v == "yes", 1, 0)
|
||||
table(clinical_df$h1n1v)
|
||||
table(clinical_df$asthma, clinical_df$h1n1v)
|
||||
|
||||
# convert to integer
|
||||
str(clinical_df$h1n1v)
|
||||
clinical_df$h1n1v = as.integer(clinical_df$h1n1v)
|
||||
str(clinical_df$h1n1v)
|
||||
|
||||
#=======================
|
||||
# ethnicity
|
||||
#=======================
|
||||
|
|
Loading…
Add table
Add a link
Reference in a new issue