******************************************************************
*STATA syntax code for the computation of index*
*values with the Thai value set (DCE and TTO hybrid)*
******************************************************************;

gen disut_mo = .
replace disut_mo = 0 if missing(disut_mo) & mobility == 1
replace disut_mo = 0.0661 if missing(disut_mo) & mobility == 2
replace disut_mo = 0.0866 if missing(disut_mo) & mobility == 3
replace disut_mo = 0.211 if missing(disut_mo) & mobility == 4
replace disut_mo = 0.3712 if missing(disut_mo) & mobility == 5

gen disut_sc = .
replace disut_sc = 0 if missing(disut_sc) & selfcare == 1
replace disut_sc = 0.0581 if missing(disut_sc) & selfcare == 2
replace disut_sc = 0.0706 if missing(disut_sc) & selfcare == 3
replace disut_sc = 0.1925 if missing(disut_sc) & selfcare == 4
replace disut_sc = 0.2499 if missing(disut_sc) & selfcare == 5

gen disut_ua = .
replace disut_ua = 0 if missing(disut_ua) & activity == 1
replace disut_ua = 0.0583 if missing(disut_ua) & activity == 2
replace disut_ua = 0.0712 if missing(disut_ua) & activity == 3
replace disut_ua = 0.1535 if missing(disut_ua) & activity == 4
replace disut_ua = 0.2483 if missing(disut_ua) & activity == 5

gen disut_pd = .
replace disut_pd = 0 if missing(disut_pd) & pain == 1
replace disut_pd = 0.0564 if missing(disut_pd) & pain == 2
replace disut_pd = 0.0665 if missing(disut_pd) & pain == 3
replace disut_pd = 0.2069 if missing(disut_pd) & pain == 4
replace disut_pd = 0.2564 if missing(disut_pd) & pain == 5

gen disut_ad = .
replace disut_ad = 0 if missing(disut_ad) & anxiety == 1
replace disut_ad = 0.0581 if missing(disut_ad) & anxiety == 2
replace disut_ad = 0.0958 if missing(disut_ad) & anxiety == 3
replace disut_ad = 0.2327 if missing(disut_ad) & anxiety == 4
replace disut_ad = 0.2953 if missing(disut_ad) & anxiety == 5

gen disut_total = disut_mo + disut_sc + disut_ua + disut_pd + disut_ad 

gen EQ_index = . 
replace EQ_index = 1 - disut_total
replace EQ_index = round(EQ_index, .001)