SAS-Makro-Programmierung: - Urz
SAS-Makro-Programmierung: - Urz SAS-Makro-Programmierung: - Urz
d. Sie benötigen 3 verschiedene Aufrufe:%plotte(1,sds=co.iris,y=pw,x=pl,z=blume);%plotte(2,sds=co.iris,y=pw,x=pl,z=blume);%plotte(3,sds=co.iris,y=pw,x=pl,z=blume);9. %macro kreuztab(zeile,spalte,sds=);proc freq data=&sds;tables &zeile*&spalte;run;%mend kreuztab;Für den zweiten Aufgabenteil benötigen Sie folgende Schritte:proc format ;value sl6.4-7.9='a'5.8-6.3='B'5.1-5.7='c'4.3-5.0='d';run;data iris;set co.iris;format sl:sl.;run;%kreuztab(sl,blume,sds=iris)10. id=global %let-Anweisung außerhalb eines Makrossds=lokalMakro-Schlüsselparameterort=lokal%let-Anweisung innerhalb eines Makrossysdate=global automatische Makrovariable12. %macro machdat(i,seedy,seedx,dateinam=);%global SDS;%let sds=&dateinam;data &sds;do i=1 to &i ;y=rannor(&seedy);x=rannor(&seedx);output;end;run;%prinsort;%mend machdat;%macro prinsort;proc sort data=&sds;by x;proc print data=&sds;run;%mend prinsort;Sie müssen die Variable sds nicht global definieren, da SAS standardmäßig den zuletzt benutztenDatensatz bearbeitet, und das Makro %prinsort den richtigen Datensatz findet.13. %macro nummer;%*Dieses Makro fragt danach, welchen Datensatz sie entweder mit derProzedur Print oder Means bearbeiten wollen.;%put Welchen Datensatz wollen Sie bearbeiten?;%input sds;%put Wählen Sie eine der drei Möglichkeiten:Ausdruck (geben sie eine 1 an)Mittelwerte ( geben sie eine 2 an);%input a;%*Falls a=1 ist, dann wird die Prozedur Print ausgeführt.;%if &a=1 %then%Do;58
Proc print data=&sds;run;%end;%* Falls a=2 ist, dann wird die Prozedur Means ausgeführt.;%else %do;Proc means data=&sds;run;%end;%mend nummer;14. %macro menue;%put Sie haben folgende Möglichkeiten:;%put;%put %str( 1. Patientenaufnahme);%put %str( 2. Löschen eines Patienten);%put %str( 3. Listenausdruck);%put %str( mit Sortierreihenfolge);%put %str( a. Familienname);%put %str( b. Wohnort);%put;%put %str( Treffen Sie Ihre Entscheidung: ___);%input entsch;%mend menue;15.%Macro prompt;%put Geben Sie den Namen ihres Datensatzes an;%input sds;%put Welche Prozedur wollen Sie damit Ausführen?;%input proz;Proc &Proz Data=&SDS;run;%Mend prompt;%prompt ;16. %window anfang color=white#11 @23 'Hallo, hier ist ihr SAS-System' c=red#13 @23 'Falls Sie die folgenden Libname-Anweisungen gesetzt habenwollen' c=red#15 @23 'geben Sie bitte eine 1 ein' color=red @53 wert 1 attr=underlinec=green#17 @27 'b=Laufwerk B'#18 @27 'a=Laufwerk A'#19 @27 'co=N:\sasurz\daten' ;%macro beginn;%display anfang delete;%if &wert=1 %then%do;libname b'B:\';libname a'A:\';libname co 'N:\sasurz\daten';%end;%mend beginn;17. %macro dateinam(sds=&syslast);%put Die Libref heißt: %scan(&sds,1,.);%put Die eigentliche Datei hat den Namen: %scan(&sds,2,.);%mend dateinam;18. %let name=holger geißler;%put Mein Name ist: %upcase(&name);%put Die Länge meines Namens ist %eval(%length(&name)-1) Buchstaben;19. Das Makro intsum sieht folgendermaßen aus:%macro intsum(n);%eval(&n*(&n+1)/2);%mend intsum;a) %let total=%intsum(10);59
- Seite 7 und 8: Makrovariablen unterscheiden sich g
- Seite 9 und 10: 2.2 Benutzerdefinierte Makrovariabl
- Seite 11 und 12: %let vname=hans;%let name=&vname Sc
- Seite 13 und 14: • definieren lokale Makrovariable
- Seite 15 und 16: 4. Lokale und globale Makrovariable
- Seite 17 und 18: Dies bedeutet, daß der Makro-Proze
- Seite 19 und 20: Makro-Programmanweisungen sind die
- Seite 21 und 22: %put &name;%mend vornach; Der Makro
- Seite 23 und 24: infile in2;input produkt kosten dat
- Seite 25 und 26: un;%kurz: proc print data=_last_(ob
- Seite 27 und 28: Fenstername benennt das Fenster und
- Seite 29 und 30: PROTECT=YES|NOFalls Sie PROTECT=YES
- Seite 31 und 32: Bild 2: Makro DISP zeigt beide Grup
- Seite 33 und 34: 6.1 Funktionen zur Bearbeitung von
- Seite 36 und 37: Beispiel 1: %macro Verglei;%put Geb
- Seite 38 und 39: Beispiele:%let wert=%eval(50+60);%p
- Seite 41 und 42: Aufruf:%end;%put Ergebnis: &wert1 &
- Seite 43 und 44: 7. Berührungspunkte zwischen Makro
- Seite 45 und 46: Die Ausprägung der Variable muß e
- Seite 47 und 48: 7.1.3 Resolve-FunktionDiese Funktio
- Seite 49 und 50: Syntax:call execute(argument);Das a
- Seite 51 und 52: 8.1 Named styled Makros"Named style
- Seite 53 und 54: SystemoptionErklärungmautosource/B
- Seite 55 und 56: 9.3 Allgemeine SystemoptionenSystem
- Seite 57: Lösungvorschläge zu den Übungsau
- Seite 61 und 62: %put Fügen sie die Fehlermeldung
- Seite 63 und 64: Welcher SAS-Code wird mit folgenden
- Seite 65 und 66: 11. Schreiben Sie ein Makro PLOTTER
- Seite 67 und 68: Makro-Programmanweisungen .... 7; 1
- Seite 69 und 70: 8ÔI’d){(oœXŒ1l)os,s->Š m?&˜$
- Seite 71 und 72: "%r({› &m?s/)-(oš4&(u¢W"]3I-8£
- Seite 73: wu£#¤ }~¥~z`}~W…¦#¥~y{w¦#"~
Proc print data=&sds;run;%end;%* Falls a=2 ist, dann wird die Prozedur Means ausgeführt.;%else %do;Proc means data=&sds;run;%end;%mend nummer;14. %macro menue;%put Sie haben folgende Möglichkeiten:;%put;%put %str( 1. Patientenaufnahme);%put %str( 2. Löschen eines Patienten);%put %str( 3. Listenausdruck);%put %str( mit Sortierreihenfolge);%put %str( a. Familienname);%put %str( b. Wohnort);%put;%put %str( Treffen Sie Ihre Entscheidung: ___);%input entsch;%mend menue;15.%Macro prompt;%put Geben Sie den Namen ihres Datensatzes an;%input sds;%put Welche Prozedur wollen Sie damit Ausführen?;%input proz;Proc &Proz Data=&SDS;run;%Mend prompt;%prompt ;16. %window anfang color=white#11 @23 'Hallo, hier ist ihr <strong>SAS</strong>-System' c=red#13 @23 'Falls Sie die folgenden Libname-Anweisungen gesetzt habenwollen' c=red#15 @23 'geben Sie bitte eine 1 ein' color=red @53 wert 1 attr=underlinec=green#17 @27 'b=Laufwerk B'#18 @27 'a=Laufwerk A'#19 @27 'co=N:\sasurz\daten' ;%macro beginn;%display anfang delete;%if &wert=1 %then%do;libname b'B:\';libname a'A:\';libname co 'N:\sasurz\daten';%end;%mend beginn;17. %macro dateinam(sds=&syslast);%put Die Libref heißt: %scan(&sds,1,.);%put Die eigentliche Datei hat den Namen: %scan(&sds,2,.);%mend dateinam;18. %let name=holger geißler;%put Mein Name ist: %upcase(&name);%put Die Länge meines Namens ist %eval(%length(&name)-1) Buchstaben;19. Das <strong>Makro</strong> intsum sieht folgendermaßen aus:%macro intsum(n);%eval(&n*(&n+1)/2);%mend intsum;a) %let total=%intsum(10);59
Change language