del open e06-1.txt skipline fac bopael 2979 2 fac segment 2979 8 fac kon 2979 2 fac hold 2979 9 fac aldersgr 2979 3 fac sp7 sp11 2979 5 var obsnr forbruge session dyrnr h1 snit y alder s18 s26 \ fedtet1 fedtet2 textur1 textur2 textur3 textur4 textur5 textur6 udseend1 \ udseend2 afsmag1 afsmag2 afsmag3 koed1 koed2 koed3 koed4 koed5 koed6 \ sp13a sp13b sp13c sp13d sp13e sp20a sp20b sp20c sp20d sp20e sp20f sp20g sp20h sp20i \ sp20j sp20k sp20l alle9 phv phh kompres vandpct fedtpct nmaetted nmonouma \ npolyuma njodtal pmaetted pmonouma ppolyuma pjodtal varians 2979 read obsnr forbruge bopael=,R,H session hold dyrnr h1 snit y alder kon aldersgr s18 \ s26 fedtet1 fedtet2 textur1 textur2 textur3 textur4 textur5 textur6 udseend1 \ udseend2 afsmag1 afsmag2 afsmag3 koed1 koed2 koed3 koed4 koed5 koed6 sp7 sp11 \ sp13a sp13b sp13c sp13d sp13e sp20a sp20b sp20c sp20d sp20e sp20f sp20g sp20h sp20i \ sp20j sp20k sp20l segment=,A,B,C,D,E,F,G,H alle9 phv phh kompres vandpct fedtpct \ nmaetted nmonouma npolyuma njodtal pmaetted pmonouma ppolyuma pjodtal varians sort hold forbruge + var nr 2979 nr=#-(hold-1)*331 fac nr1 2979 2 fac nr2 2979 166 nr2=nr-166*(nr>166) nr1=1+(nr>166) save data