library(readxl)
WHO_FINAL_DATA_EXCEL <- read_excel("~/Documents/OneDrive/2_Apple/WHO_analysis/WHO_FINAL_DATA_EXCEL.xlsx")
## Warning: Expecting logical in CJ1127 / R1127C88: got 'Daily'
## Warning: Expecting logical in CJ1286 / R1286C88: got 'Daily'
## Warning: Expecting logical in CJ1403 / R1403C88: got 'Daily'
## New names:
## • `Others` -> `Others...16`
## • `How soon after you wake in the morning do you smoke or first use tobacco?`
## -> `How soon after you wake in the morning do you smoke or first use
## tobacco?...36`
## • `For how many years have you been using/used these tobacco products?` -> `For
## how many years have you been using/used these tobacco products?...42`
## • `In the three months before your COVID infection did you use tobacco
## products?` -> `In the three months before your COVID infection did you use
## tobacco products?...43`
## • `In the three months before your COVID infection, how often have you been
## using tobacco products:` -> `In the three months before your COVID infection,
## how often have you been using tobacco products:...44`
## • `After the COVID-19 infection, what has been your pattern of use of tobacco
## products:` -> `After the COVID-19 infection, what has been your pattern of
## use of tobacco products:...45`
## • `For how many years have you been using/used these tobacco products?` -> `For
## how many years have you been using/used these tobacco products?...55`
## • `In the three months before your COVID infection did you use tobacco
## products?` -> `In the three months before your COVID infection did you use
## tobacco products?...56`
## • `In the three months before your COVID infection, how often have you been
## using tobacco products:` -> `In the three months before your COVID infection,
## how often have you been using tobacco products:...57`
## • `After the COVID-19 infection, what has been your pattern of use of tobacco
## products:` -> `After the COVID-19 infection, what has been your pattern of
## use of tobacco products:...58`
## • `How soon after you wake in the morning do you smoke or first use tobacco?`
## -> `How soon after you wake in the morning do you smoke or first use
## tobacco?...59`
## • `For how many years have you been using/used these tobacco products?` -> `For
## how many years have you been using/used these tobacco products?...66`
## • `In the three months before your COVID infection did you use tobacco
## products?` -> `In the three months before your COVID infection did you use
## tobacco products?...67`
## • `In the three months before your COVID infection, how often have you been
## using tobacco products:` -> `In the three months before your COVID infection,
## how often have you been using tobacco products:...68`
## • `After the COVID-19 infection, what has been your pattern of use of tobacco
## products:` -> `After the COVID-19 infection, what has been your pattern of
## use of tobacco products:...69`
## • `For how many years have you been using/used these tobacco products?` -> `For
## how many years have you been using/used these tobacco products?...79`
## • `In the three months before your COVID infection did you use tobacco
## products?` -> `In the three months before your COVID infection did you use
## tobacco products?...80`
## • `In the three months before your COVID infection, how often have you been
## using tobacco products:` -> `In the three months before your COVID infection,
## how often have you been using tobacco products:...81`
## • `After the COVID-19 infection, what has been your pattern of use of tobacco
## products:` -> `After the COVID-19 infection, what has been your pattern of
## use of tobacco products:...82`
## • `Others` -> `Others...107`
## • `` -> `...109`
## • `` -> `...110`
## • `` -> `...111`
## • `` -> `...112`
## • `` -> `...113`
## • `` -> `...114`
View(WHO_FINAL_DATA_EXCEL)
## Warning in system2("/usr/bin/otool", c("-L", shQuote(DSO)), stdout = TRUE):
## running command ''/usr/bin/otool' -L '/Library/Frameworks/R.framework/Resources/
## modules/R_de.so'' had status 1
table(WHO_FINAL_DATA_EXCEL$Gender)
##
## Female Male
## 469 943
table(WHO_FINAL_DATA_EXCEL$Responder)
##
## Family Member for the patient ( patient alive )
## 377
## Family Member for the patient ( patient dead )
## 32
## Patient
## 1003
table(WHO_FINAL_DATA_EXCEL$AgeYears)
##
## <15 years <15years >60 years >60years 15-30 years 15-30years
## 1 6 82 72 110 146
## 31-45 years 31-45years 46-60 years 46-60years
## 236 306 222 231
table(WHO_FINAL_DATA_EXCEL$SES)
##
## APL card holder BPL card holder
## 1042 370
table(WHO_FINAL_DATA_EXCEL$Occupation)
##
## Neither home nor hospital based/related work
## 940
## Work from/at home
## 347
## Work in/associated with hospital
## 125
table(WHO_FINAL_DATA_EXCEL$Background)
##
## Rural Urban
## 311 1101
table(WHO_FINAL_DATA_EXCEL$Diabetes)
##
## No Yes
## 651 207
table(WHO_FINAL_DATA_EXCEL$HTN)
##
## No Yes
## 1203 114
table(WHO_FINAL_DATA_EXCEL$HeartDisease)
##
## No Yes
## 745 145
table(WHO_FINAL_DATA_EXCEL$KidneyDisease)
##
## No Yes
## 1276 6
table(WHO_FINAL_DATA_EXCEL$Cancer)
##
## No Yes
## 758 30
table(WHO_FINAL_DATA_EXCEL$LungDisease)
##
## No Yes
## 1371 13
table(WHO_FINAL_DATA_EXCEL$Mentalillness)
##
## No Yes
## 747 22
table(WHO_FINAL_DATA_EXCEL$`What happened during COVID-19 illness? [Had symptoms but did not need hospitalisation ]`)
##
## No Yes Yes, No
## 173 592 2
table(WHO_FINAL_DATA_EXCEL$`What happened during COVID-19 illness? [ Needed hospitalisation ]`)
##
## No Yes
## 1324 81
table(WHO_FINAL_DATA_EXCEL$`What happened during COVID-19 illness? [Needed ICU care]`)
##
## No Yes
## 1382 27
table(WHO_FINAL_DATA_EXCEL$`What happened during COVID-19 illness? [Passed away (if about family member)]`)
##
## No Yes
## 751 98