Link - Frau Prof. Dr. rer. nat. Kira Klenke - Hochschule Hannover

TITLE2 "Variable &NF2 auf der X-Achse";
PROC GPLOT DATA=mean;
PLOT mwe*&F2=&F1/HAXIS=axis2 VAXIS=axis1 LEGEND=legend;
%FORMLAB;
LABEL mwe='Mittelw. d. Verluste pro 1000 AH u. Wo';
RUN;
QUIT;
%MEND;
SAS-Programme
%ODSQuer(Interaktionsplots_2004_04_26);
%IAP(Haltung,Groesse,1 to 3,0 to 1,Haltungsform,Betriebsgrößenklasse);
%IAP(f1_6anz_ein_quali,haltung,1 to 3,1 to 3, Anfangshennen, Haltungsform);
%IAP(f1_6anz_ein_quali,Groesse,1 to 3,0 to 1, Anfangshennen, Betriebsgrößenklasse);
%IAP(f1_10beh_w_i,haltung,0 to 1,1 to 3, Milben während, Haltungsform,
WHERE f1_10beh_w_i ne .);
%IAP(f1_10beh_w_i,f1_6anz_ein_quali,0 to 1,1 to 3,Milben während, Anfangshennen,
WHERE f1_10beh_w_i ne .);
%IAP(f1_10beh_w_i,Groesse,0 to 1,0 to 1,Milben während,Betriebsgrößenklasse,
WHERE f1_10beh_w_i ne .);
ODS RTF CLOSE;
B.7 Modellbildung für das modifizierte Endmodell
/*************************************************************************
Programmdatei: Endmodellbildung_Diplom.sas
Autor: Jan Schäl
Modellbildung für das modifizierte Endmodell
**************************************************************************/
DATA neu;
SET ADS_A;
IF verluste1000Wo>90 THEN DELETE;
IF f1_3legelinie in (10 12 17 18) THEN f1_3legelinie=1;
IF f1_3legelinie >=30 THEN f1_3legelinie=2;
IF f1_10beh_w_a = 2 THEN f1_10beh_w_a = 1;
IF f1_10beh_w_b = 2 THEN f1_10beh_w_b = 1;
IF f1_10beh_w_c = 2 THEN f1_10beh_w_c = 1;
IF f1_10beh_w_d = 2 THEN f1_10beh_w_d = 1;
IF f1_10beh_w_e = 2 THEN f1_10beh_w_e = 1;
IF f1_10beh_w_f = 2 THEN f1_10beh_w_f = 1;
IF f1_10beh_w_g = 2 THEN f1_10beh_w_g = 1;
IF f1_10beh_w_h = 2 THEN f1_10beh_w_h = 1;
IF f1_10beh_w_i = 2 THEN f1_10beh_w_i = 1;
IF f1_10beh_w_j = 2 THEN f1_10beh_w_j = 1;
IF f1_11verhalt_a = 2 THEN f1_11verhalt_a = 1;
IF f1_11verhalt_b = 2 THEN f1_11verhalt_b = 1;
IF f1_11verhalt_c = 2 THEN f1_11verhalt_c = 1;
IF f1_4haltung=3 THEN DELETE;*VoA=Ausschluss wegen zu kleinem n;
138