topic Erstellen Ausgangsgrupep aus Gesamtgruppe in SAS Programming

topic Erstellen Ausgangsgrupep aus Gesamtgruppe in SAS Programming https://communities.sas.com/t5/SAS-Programming/Erstellen-Ausgangsgrupep-aus-Gesamtgruppe/m-p/902569#M356697 <P>Hallo, <BR />Ich möchte gerne aus meinem Datensatz mit vielen Patienten, die Patienten herausgreifen, die mindestens einmal aza_absetzenjemals=1 haben. Wenn dies mindestens einmal erfolgt ist, sollen alle Einträge mit dieser pati_id in eine neue Liste die Ausgangsgruppe übernommen werden. <BR />Die pati_id sind zudem nach der Anzahl besuche aufsteigend sortiert. <BR />Ich habe bisher diesen Code geschrieben, allerdings erhalte ich dann in Ergebnis eine Liste, in der die Werte unterhalb des ersten Falles von aza_absetzenjemals=1 immer 1 anzeigen. Überhalb jedoch bleibt der Wert auf 0. </P><P> </P><DIV>data TG1_Help;</DIV><DIV>    set TG1;</DIV><DIV>    by pati_id;</DIV><DIV>    retain aza_absetzenjemals;</DIV><DIV><SPAN>lag_pati_id = lag(pati_id);</SPAN></DIV><DIV><SPAN>lag_aza_absetzenjemals=lag(aza_absetzenjemals);</SPAN></DIV><DIV>    </DIV><DIV>    * Initialisiere die Liste für pati_ids;</DIV><DIV>    if _N_ = 1 then do;</DIV><DIV>        declare hash pati_ids();</DIV><DIV>        pati_ids.defineKey('pati_id');</DIV><DIV>        pati_ids.defineDone();</DIV><DIV>    end;</DIV><DIV> </DIV><DIV><SPAN>put pati_id visit aza_absetzenjemals;</SPAN></DIV><DIV><SPAN>if aza_absetzenjemals = 1 then do;</SPAN></DIV><DIV>        do index = _N_-1 to 1 by -1 while(pati_id=lag_pati_id and lag_aza_absetzenjemals ne 1);</DIV><DIV><SPAN>put pati_id visit index lag_pati_id aza_absetzenjemals lag_aza_absetzenjemals;</SPAN></DIV><DIV><SPAN>aza_absetzenjemals=1;</SPAN></DIV><DIV><SPAN>put pati_id visit index lag_pati_id aza_absetzenjemals lag_aza_absetzenjemals;</SPAN></DIV><DIV><SPAN>*output;</SPAN></DIV><DIV><SPAN>put pati_id visit index lag_pati_id aza_absetzenjemals lag_aza_absetzenjemals;</SPAN></DIV><DIV><SPAN>set TG1 point=index;</SPAN></DIV><DIV>        end;</DIV><DIV> </DIV><DIV>    end;</DIV><DIV>    else do;</DIV><DIV> </DIV><DIV><SPAN>put pati_id visit index lag_pati_id aza_absetzenjemals lag_aza_absetzenjemals;</SPAN></DIV><DIV><SPAN>aza_absetzenjemals=0;</SPAN></DIV><DIV><SPAN>put pati_id visit index lag_pati_id aza_absetzenjemals lag_aza_absetzenjemals;</SPAN></DIV><DIV><SPAN>*output;</SPAN></DIV><DIV><SPAN>end;</SPAN></DIV><DIV><SPAN>output;</SPAN></DIV><DIV>run;</DIV><DIV> </DIV><DIV>proc print data=TG1_Help;</DIV><DIV>   var pati_id visit aza_absetzenjemals;</DIV><DIV>run;</DIV><P><BR />Ich bin über jede Hilfe dankbar!<BR />Liebe Grüße Franzi<BR /><BR /></P> Fri, 10 Nov 2023 18:08:30 GMT XFranziska 2023-11-10T18:08:30Z Erstellen Ausgangsgrupep aus Gesamtgruppe https://communities.sas.com/t5/SAS-Programming/Erstellen-Ausgangsgrupep-aus-Gesamtgruppe/m-p/902569#M356697 <P>Hallo, <BR />Ich möchte gerne aus meinem Datensatz mit vielen Patienten, die Patienten herausgreifen, die mindestens einmal aza_absetzenjemals=1 haben. Wenn dies mindestens einmal erfolgt ist, sollen alle Einträge mit dieser pati_id in eine neue Liste die Ausgangsgruppe übernommen werden. <BR />Die pati_id sind zudem nach der Anzahl besuche aufsteigend sortiert. <BR />Ich habe bisher diesen Code geschrieben, allerdings erhalte ich dann in Ergebnis eine Liste, in der die Werte unterhalb des ersten Falles von aza_absetzenjemals=1 immer 1 anzeigen. Überhalb jedoch bleibt der Wert auf 0. </P><P> </P><DIV>data TG1_Help;</DIV><DIV>    set TG1;</DIV><DIV>    by pati_id;</DIV><DIV>    retain aza_absetzenjemals;</DIV><DIV><SPAN>lag_pati_id = lag(pati_id);</SPAN></DIV><DIV><SPAN>lag_aza_absetzenjemals=lag(aza_absetzenjemals);</SPAN></DIV><DIV>    </DIV><DIV>    * Initialisiere die Liste für pati_ids;</DIV><DIV>    if _N_ = 1 then do;</DIV><DIV>        declare hash pati_ids();</DIV><DIV>        pati_ids.defineKey('pati_id');</DIV><DIV>        pati_ids.defineDone();</DIV><DIV>    end;</DIV><DIV> </DIV><DIV><SPAN>put pati_id visit aza_absetzenjemals;</SPAN></DIV><DIV><SPAN>if aza_absetzenjemals = 1 then do;</SPAN></DIV><DIV>        do index = _N_-1 to 1 by -1 while(pati_id=lag_pati_id and lag_aza_absetzenjemals ne 1);</DIV><DIV><SPAN>put pati_id visit index lag_pati_id aza_absetzenjemals lag_aza_absetzenjemals;</SPAN></DIV><DIV><SPAN>aza_absetzenjemals=1;</SPAN></DIV><DIV><SPAN>put pati_id visit index lag_pati_id aza_absetzenjemals lag_aza_absetzenjemals;</SPAN></DIV><DIV><SPAN>*output;</SPAN></DIV><DIV><SPAN>put pati_id visit index lag_pati_id aza_absetzenjemals lag_aza_absetzenjemals;</SPAN></DIV><DIV><SPAN>set TG1 point=index;</SPAN></DIV><DIV>        end;</DIV><DIV> </DIV><DIV>    end;</DIV><DIV>    else do;</DIV><DIV> </DIV><DIV><SPAN>put pati_id visit index lag_pati_id aza_absetzenjemals lag_aza_absetzenjemals;</SPAN></DIV><DIV><SPAN>aza_absetzenjemals=0;</SPAN></DIV><DIV><SPAN>put pati_id visit index lag_pati_id aza_absetzenjemals lag_aza_absetzenjemals;</SPAN></DIV><DIV><SPAN>*output;</SPAN></DIV><DIV><SPAN>end;</SPAN></DIV><DIV><SPAN>output;</SPAN></DIV><DIV>run;</DIV><DIV> </DIV><DIV>proc print data=TG1_Help;</DIV><DIV>   var pati_id visit aza_absetzenjemals;</DIV><DIV>run;</DIV><P><BR />Ich bin über jede Hilfe dankbar!<BR />Liebe Grüße Franzi<BR /><BR /></P> Fri, 10 Nov 2023 18:08:30 GMT https://communities.sas.com/t5/SAS-Programming/Erstellen-Ausgangsgrupep-aus-Gesamtgruppe/m-p/902569#M356697 XFranziska 2023-11-10T18:08:30Z Re: Erstellen Ausgangsgrupep aus Gesamtgruppe https://communities.sas.com/t5/SAS-Programming/Erstellen-Ausgangsgrupep-aus-Gesamtgruppe/m-p/902615#M356712 <P><SPAN>Das folgende program erstellt zunächst eine Hash-Tabelle und lädt sie mit allen Patienten-IDs, die mindestens einen Fall (eine Zeile) mit aza_absetzenjemals=1 haben. Anschließend wählt die Logik alle Zeilen aus TG1 aus, die eine übereinstimmende patient_id in der Hash-Tabelle haben.</SPAN></P> <PRE><CODE class=" language-sas">data TG1_Help; * Initialisiere die Liste für pati_ids; if _N_ = 1 then do; /* Hash liste mit pati_id's die mindestens einmal aza_absetzenjemals=1 haben */ declare hash pati_ids(dataset:'TG1(where=(aza_absetzenjemals=1 ))'); pati_ids.defineKey('pati_id'); pati_ids.defineDone(); end; set TG1; if pati_ids()=0 then output; run;</CODE></PRE> Sat, 11 Nov 2023 01:59:36 GMT https://communities.sas.com/t5/SAS-Programming/Erstellen-Ausgangsgrupep-aus-Gesamtgruppe/m-p/902615#M356712 Patrick 2023-11-11T01:59:36Z