..

[bagwell (想是遇到荒謬的牆)]

options noxwait noxsync;
filename xx dde' excel|a:\data1.xls!R1C1:R68C14';
data aa;
infile xx notab dlm='09'x dsd missover;
input NO $ GRADE WEIGHT HEIGHT BIRTHDT $ CREDIT CLUB RIGHT LEFT DEPART GENDER BLOOD ASTRO CALCULAT $;
proc print;
run;


data a;
set aa;
if credit>20 then gr1='1';
else gr1='2';
proc print;
run;


data b (keep=no club credit);
set aa;
proc print;
run;


data c;
set aa;
if depart='1' then output;
proc print;
run;


data d;
set aa;
proc sort;
by decending club;
proc print;
run;

--
╭─────╮    ╮    ╮         ╮             ╮
│──┬──│  ─┼─┬┼─   ╮  │  ╭         │
│╭─┼─╮│  ╮│  ││     │╮│╭│         │
││  │  ││  ├┼╮├┼╮   ╰╯│╰╯   │    │    │
│╰─┼─╯│  ││  │││       │─╮   │    │    │
╯╭─┴─┤╰  ╯│─╯│╰   ──╯  ╰   ╰──┴──╯

--
※ 發信站: 批踢踢實業坊(ptt.twbbs.org) 
◆ From: steamev.m3.ntu.edu.tw