___  ____  ____  ____  ____ (R)
 /__    /   ____/   /   ____/
___/   /   /___/   /   /___/   11.0   Copyright 1984-2009
  Statistics/Data Analysis            StataCorp
                                      4905 Lakeway Drive
     MP - Parallel Edition            College Station, Texas 77845 USA
                                      800-STATA-PC        http://www.stata.com
                                      979-696-4600        stata@stata.com
                                      979-696-4601 (fax)

Single-user 2-core Stata perpetual license:
       Serial number:  50110533453
         Licensed to:  New User
                       CHERE

Notes:
      1.  (/m# option or -set memory-) 50.00 MB allocated to data
      2.  (/v# option or -set maxvar-) 5000 maximum variables
      3.  New update available; type -update all-

. do "F:\Projects\Current\CREST\Publications\Fact sheets\eq5d5l scores.do" 

. ******************************************************************************
> ***********
. * This do-file produces utility weights for Australia for the EQ-5D-5L. It is 
> based on  *
. * a DCE which is in press in Applied Health Economics and Health Policy. (writ
> ten by    *
. * RN, May 2013). It assumes the data is set up in 5 columns labelled mo, sc, u
> a, pd, ad *
. 
. gen modec = .

. replace modec = 0 if mo==1
(0 real changes made)

. replace modec = -0.072 if mo==2
(0 real changes made)

. replace modec = -0.091 if mo==3
(0 real changes made)

. replace modec = -0.276 if mo==4
(0 real changes made)

. replace modec = -0.302 if mo==5
(0 real changes made)

. 
. gen scdec = .

. replace scdec = 0 if sc==1
(0 real changes made)

. replace scdec = -0.072 if sc==2
(0 real changes made)

. replace scdec = -0.079 if sc==3
(0 real changes made)

. replace scdec = -0.218 if sc==4
(0 real changes made)

. replace scdec = -0.301 if sc==5
(0 real changes made)

. 
. gen uadec = .

. replace uadec = 0 if ua==1
(0 real changes made)

. replace uadec = -0.116 if ua==2
(0 real changes made)

. replace uadec = -0.120 if ua==3
(0 real changes made)

. replace uadec = -0.283 if ua==4
(0 real changes made)

. replace uadec = -0.283 if ua==5
(0 real changes made)

. 
. gen pddec = .

. replace pddec = 0 if pd==1
(0 real changes made)

. replace pddec = -0.079 if pd==2
(0 real changes made)

. replace pddec = -0.089 if pd==3
(0 real changes made)

. replace pddec = -0.259 if pd==4
(0 real changes made)

. replace pddec = -0.333 if pd==5
(0 real changes made)

. 
. gen addec = .

. replace addec = 0 if ad==1
(0 real changes made)

. replace addec = -0.14 if ad==2
(0 real changes made)

. replace addec = -0.246 if ad==3
(0 real changes made)

. replace addec = -0.398 if ad==4
(0 real changes made)

. replace addec = -0.398 if ad==5
(0 real changes made)

. 
. gen n5dec = 0

. replace n5dec = -0.059 if mo==5 | sc==5 | ua==5 | pd==5 | ad==5 
(0 real changes made)

. 
. gen eq5d5lscore = 1 + modec + scdec + uadec + pddec + addec + n5dec

. replace eq5d5lscore = . if mo==. | sc==. | ua==. | pd==. | ad==.
(0 real changes made)

. 
end of do-file

.