falls es wen interessieren sollte. ich hab das do-File zur Kreditaufgabe geschrieben. es sollte richtig sein.falls doch wer einen fehler findet, darf er diesen gern berichtigen
angabe: 5 kredite, wahrscheinlichkeit f. mind. 1 Ausfall und Wahrscheinlichkeit f. max 2 Ausfälle
clear
set obs 10000
gen k1=uniform()<=0.05
gen k2=uniform()<=0.05
gen k3=uniform()<=0.05
gen k4=uniform()<=0.05
gen k5=uniform()<=0.05
gen kredite_verteilung=k1+k2+k3+k4+k5
tab kredite_verteilung
*** mehr als 1 Ausfall
gen mehr_als_ein=kredite_verteilung >= 1
label define label_ma1 0"kein Ausfall" 1"mind. 1 Ausfall"
label values mehr_als_ein label_ma1
*** max 2 Ausfälle
gen max_zwei=kredite_verteilung ==2
label define label_max2 0"weniger als 2" 1"genau 2"
label values max_zwei label_max2
tab mehr_als_ein
tab max_zwei
Lesezeichen