This is one of 3 functions used to create a derived variable (resp_condition_der) that determines if a respondents has a respiratory condition. This function is for CCHS cycles (2005-2007) that use COPD & Emphysema as separate variables, as well as Bronchitis. Asthma is used across CCHS cycles as a separate variable.

resp_condition_fun2(DHHGAGE_cont, CCC_91E, CCC_91F, CCC_91A, CCC_031)

Arguments

DHHGAGE_cont

continuous age variable.

CCC_91E

variable indicating if respondent has emphysema

CCC_91F

variable indicating if respondent has COPD

CCC_91A

variable indicating if respondent has chronic bronchitis

CCC_031

variable indicating if respondent has asthma

Value

a categorical variable (resp_condition_der) with 3 levels:

  1. respondent is over the age of 35 and has a respiratory condition

  2. respondent is under the age of 35 and has a respiratory condition

  3. respondent does not have a respiratory condition

See also

Examples

# Using resp_condition_fun2() to create values across CCHS cycles # (2005-2007) resp_condition_fun2() is specified in # variable_details.csv along with the CCHS variables and cycles included. # To transform resp_condition_der, use rec_with_table() for each CCHS cycle # and specify resp_condition_der, along with the various respiratory # variables. Then by using merge_rec_data() you can combine # resp_condition_der across cycles. library(cchsflow) resp2005 <- suppressWarnings(rec_with_table( cchs2005_p, c( "DHHGAGE_cont", "CCC_91E", "CCC_91F", "CCC_91A", "CCC_031", "resp_condition_der" ) ))
#> No variable_details detected. #> Loading cchsflow variable_details
#> Using the passed data variable name as database_name
head(resp2005)
#> CCC_031 CCC_91A CCC_91E CCC_91F DHHGAGE_cont resp_condition_der #> 1 2 2 NA(a) NA(a) 27 3 #> 2 2 2 2 2 77 3 #> 3 2 2 2 2 32 3 #> 4 2 2 2 2 77 3 #> 5 2 2 2 2 85 3 #> 6 2 2 NA(a) NA(a) 13 3
resp2007_2008 <- suppressWarnings(rec_with_table( cchs2007_2008_p, c( "DHHGAGE_cont", "CCC_91E", "CCC_91F", "CCC_91A", "CCC_031", "resp_condition_der" ) ))
#> No variable_details detected. #> Loading cchsflow variable_details
#> Using the passed data variable name as database_name
tail(resp2007_2008)
#> CCC_031 CCC_91A CCC_91E CCC_91F DHHGAGE_cont resp_condition_der #> 195 2 2 2 2 62 3 #> 196 2 2 2 2 37 3 #> 197 2 2 2 2 77 3 #> 198 2 2 2 2 42 3 #> 199 2 2 2 2 32 3 #> 200 2 NA(b) 2 2 72 NA(b)
combined_resp <- suppressWarnings(merge_rec_data(resp2005, resp2007_2008)) head(combined_resp)
#> CCC_031 CCC_91A CCC_91E CCC_91F DHHGAGE_cont resp_condition_der #> 1 2 2 NA(a) NA(a) 27 3 #> 2 2 2 2 2 77 3 #> 3 2 2 2 2 32 3 #> 4 2 2 2 2 77 3 #> 5 2 2 2 2 85 3 #> 6 2 2 NA(a) NA(a) 13 3
tail(combined_resp)
#> CCC_031 CCC_91A CCC_91E CCC_91F DHHGAGE_cont resp_condition_der #> 395 2 2 2 2 62 3 #> 396 2 2 2 2 37 3 #> 397 2 2 2 2 77 3 #> 398 2 2 2 2 42 3 #> 399 2 2 2 2 32 3 #> 400 2 NA(b) 2 2 72 NA(b)