You also want an ePaper? Increase the reach of your titles
YUMPU automatically turns print PDFs into web optimized ePapers that Google loves.
use [dit dream-udtræk],clear<br />
<strong>DREAM</strong>_<strong>model2006.do</strong><br />
* <strong>DREAM</strong>'s uge-variabel-navne gøres sorterbare/tællebare mhp gennemløb (eks: Y_9132 = y199132 / y_0550 = y200550)<br />
renpfix y_9 y199<br />
renpfix y_0 y200<br />
renpfix y_1 y201<br />
* [uge] beregnes som: Antal uger mellem første Dream-uge og [IndeksDato] (f.eks.: -402 ved [IndeksDato]=21/04/1999)<br />
gen uge=int((mdy(08,05,1991)-IndeksDato)/7)-1<br />
* For hver case (lodret) gennemløbes alle uge-variable (vandret) ...<br />
forval num=199132/200550 {<br />
* Det er ikke alle værdier mellem 199132 & 200550 der modsvarer en uge variabel (eks: 199153!)...<br />
capture confirm variable y`num'<br />
if _rc==0 {<br />
replace uge=uge+1<br />
************************************************************************************************************<br />
* Optælling af ydelses-kategorier i en valgfri periode forud for [IndeksDato] (eks 156 uger = 3 år)<br />
************************************************************************************************************<br />
if uge>-156 & uge
<strong>DREAM</strong>_<strong>model2006.do</strong><br />
********************************************************************************************************************<br />
use [dit dream-udtræk],clear<br />
* <strong>DREAM</strong>'s uge-variabel-navne gøres sorterbare/tællebare mhp gennemløb (eks: Y_9132 = y199132 / y_0550 = y200550)<br />
renpfix y_9 y199<br />
renpfix y_0 y200<br />
renpfix y_1 y201<br />
* [uge] beregnes som: Antal uger mellem første Dream-uge og [IndeksDato] (f.eks.: -402 ved [IndeksDato]=21/04/1999)<br />
gen uge=int((mdy(08,05,1991)-IndeksDato)/7)-1<br />
* For hver case (lodret) gennemløbes alle uge-variable (vandret) ...<br />
forval num=199132/200550 {<br />
* Det er ikke alle værdier mellem 199132 & 200550 der modsvarer en uge variabel (eks: 199153!)...<br />
capture confirm variable y`num'<br />
if _rc==0 {<br />
replace uge=uge+1<br />
************************************************************************************************************<br />
* Optælling af forskellige ydelses-kategorier i valgfri periode efter [IndeksDato] (eks 52 uger = 1 år)<br />
************************************************************************************************************<br />
if uge>0 & uge
gen uge=int((mdy(08,05,1991)-IndeksDato)/7)-1<br />
<strong>DREAM</strong>_<strong>model2006.do</strong><br />
* For hver case (lodret) gennemløbes alle uge-variable (vandret) ...<br />
forval num=199132/200550 {<br />
* Det er ikke alle værdier mellem 199132 & 200550 der modsvarer en uge variabel (eks: 199153!)...<br />
capture confirm variable y`num'<br />
if _rc==0 {<br />
replace uge=uge+1<br />
***********************************************************************************************************<br />
* Beregning af "time" og "failure" til brug ved overlevelsesanalyse (ventetidsanalyse)<br />
***********************************************************************************************************<br />
if uge>0 {<br />
* Egentlig failure (=success!) registreres som: fail=1 ...<br />
capture confirm variable fail<br />
if _rc generate fail=0<br />
replace fail=1 if y`num'==""<br />
* EKS: VENTETIDSANALYSE:<br />
stset tid, failure(fail==1)<br />
sts graph, by(gender) gwood<br />
sts test gender<br />
strate gender, per(52)<br />
* Tid (time) registreres sålænge der ikke er mødt event (eller censur) ...<br />
capture confirm variable tid<br />
if _rc generate tid=0<br />
replace tid=uge if fail==0<br />
}<br />
}<br />
}