COMPUTE lrtot=0. EXECUTE . LOOP lpcount = 1 to 9. COMPUTE lrrand = RV.UNIFORM(0,1) . RECODE lrrand (0 thru 0.0166=5) (0.0166 thru 0.0343=6) (0.0343 thru 0.0663=7) (0.0663 thru 0.0947=8) (0.0947 thru 0.1373=9) (0.1373 thru 0.2426=10) (0.2426 thru 0.3254=11) (0.3254 thru 0.4592=12) (0.4592 thru 0.6107=13) (0.6107 thru 0.7101=14) (0.7101 thru 0.8036=15) (0.8036 thru 0.8604=16) (0.8604 thru 0.9006=17) (0.9006 thru 0.9373=18) (0.9373 thru 0.9609=19) (0.9609 thru 0.9858=20) (0.9858 thru 0.9917=21) (0.9917 thru 0.9953=22) (0.9953 thru 0.9976=24) (0.9976 thru 1.0000=25) INTO lr2 . COMPUTE lrtot = lrtot + lr2. END LOOP. COMPUTE lrmean = lrtot / 9. EXECUTE. COMPUTE lrtot=0. EXECUTE . LOOP lpcount = 1 to 100. COMPUTE lrrand = RV.UNIFORM(0,1) . RECODE lrrand (0 thru 0.0166=5) (0.0166 thru 0.0343=6) (0.0343 thru 0.0663=7) (0.0663 thru 0.0947=8) (0.0947 thru 0.1373=9) (0.1373 thru 0.2426=10) (0.2426 thru 0.3254=11) (0.3254 thru 0.4592=12) (0.4592 thru 0.6107=13) (0.6107 thru 0.7101=14) (0.7101 thru 0.8036=15) (0.8036 thru 0.8604=16) (0.8604 thru 0.9006=17) (0.9006 thru 0.9373=18) (0.9373 thru 0.9609=19) (0.9609 thru 0.9858=20) (0.9858 thru 0.9917=21) (0.9917 thru 0.9953=22) (0.9953 thru 0.9976=24) (0.9976 thru 1.0000=25) INTO lr2 . COMPUTE lrtot = lrtot + lr2. END LOOP. COMPUTE lrmean = lrtot / 100. EXECUTE . COMPUTE lrtot=0. EXECUTE . LOOP lpcount = 1 to 400. COMPUTE lrrand = RV.UNIFORM(0,1) . RECODE lrrand (0 thru 0.0166=5) (0.0166 thru 0.0343=6) (0.0343 thru 0.0663=7) (0.0663 thru 0.0947=8) (0.0947 thru 0.1373=9) (0.1373 thru 0.2426=10) (0.2426 thru 0.3254=11) (0.3254 thru 0.4592=12) (0.4592 thru 0.6107=13) (0.6107 thru 0.7101=14) (0.7101 thru 0.8036=15) (0.8036 thru 0.8604=16) (0.8604 thru 0.9006=17) (0.9006 thru 0.9373=18) (0.9373 thru 0.9609=19) (0.9609 thru 0.9858=20) (0.9858 thru 0.9917=21) (0.9917 thru 0.9953=22) (0.9953 thru 0.9976=24) (0.9976 thru 1.0000=25) INTO lr2 . COMPUTE lrtot = lrtot + lr2. END LOOP. COMPUTE lrmean = lrtot / 400. EXECUTE. COMPUTE bbtot=0. EXECUTE . LOOP lpcount = 1 to 400. COMPUTE bbrand = RV.UNIFORM(0,1) . RECODE bbrand (0 thru 0.1158=1) (0.1158 thru 0.5791=2) (0.5791 thru 0.8794=3) (0.8794 thru 0.9905=4) (0.9905 thru 1.0000=5) INTO bb2 . COMPUTE bbtot = bbtot + bb2. END LOOP. COMPUTE bbmean = bbtot / 400. EXECUTE. COMPUTE bbtot=0. EXECUTE . LOOP lpcount = 1 to 1600. COMPUTE bbrand = RV.UNIFORM(0,1) . RECODE bbrand (0 thru 0.1158=1) (0.1158 thru 0.5791=2) (0.5791 thru 0.8794=3) (0.8794 thru 0.9905=4) (0.9905 thru 1.0000=5) INTO bb2 . COMPUTE bbtot = bbtot + bb2. END LOOP. COMPUTE bbmean = bbtot / 1600. EXECUTE.