Action Principale : cdm
| 1 | DATA mycas.sevdeff; |
| 2 | LENGTH model $ 8; |
| 3 | INFILE DATALINES truncover; |
| 4 | INPUT model$ @@; |
| 5 | IF (model = 'Logn') THEN DO; |
| 6 | dist='LOGN'; |
| 7 | INPUT mu sigma; |
| 8 | END; |
| 9 | ELSE IF (model = 'Burr') THEN DO; |
| 10 | dist='BURR'; |
| 11 | INPUT alpha theta; |
| 12 | END; |
| 13 | DATALINES; |
| 14 | Logn 3 0.5 |
| 15 | Burr 2 1500 |
| 16 | ; |
| 17 | RUN; |