/* Lesson 6-1 */ /* File Name = scat01.sas 11/15/96 */ data zenin; infile 'all.dat'; input seibetsu $ shintyou taijyuu kyoui kozukai jitaku $ daigaku $; proc print data=zenin(obs=10); : (以後は表示部を省略する) run; : proc means data=zenin; : 各変量の平均値を求める run; : proc chart data=zenin; : 各変量の横棒グラフを描く hbar seibetsu shintyou taijyuu kyoui kozukai jitaku daigaku; run;
/* Lesson 6-2 */ /* File Name = scat02.sas 11/15/96 */ data zenin; infile 'all.dat'; input seibetsu $ shintyou taijyuu kyoui kozukai jitaku $ daigaku $; proc means data=zenin; run; proc plot data=zenin; plot shintyou*taijyuu; run;
/* Lesson 6-3 */ /* File Name = scat03.sas 11/15/96 */ data zenin; infile 'all.dat'; input seibetsu $ shintyou taijyuu kyoui kozukai jitaku $ daigaku $; proc means data=zenin; run; proc sort data=zenin; by seibetsu; proc means data=zenin; var shintyou taijyuu; by seibetsu; run; proc plot data=zenin; plot shintyou*taijyuu; by seibetsu; run; proc plot data=zenin; plot shintyou*taijyuu; where seibetsu='F'; run; proc plot data=zenin; plot shintyou*taijyuu; where seibetsu='M'; run;
/* Lesson 6-4 */
/* File Name = scat04.sas 11/15/96 */
data zenin;
infile 'all.dat';
input seibetsu $ shintyou taijyuu kyoui kozukai jitaku $ daigaku $;
proc means data=zenin;
run;
proc plot data=zenin;
plot shintyou*taijyuu=seibetsu/ vaxis=140 to 180 by 10
haxis=30 to 90 by 10;
run;
/* Lesson 6-5 */ /* File Name = corr01.sas 11/15/96 */ data zenin; infile 'all.dat'; input seibetsu $ shintyou taijyuu kyoui kozukai jitaku $ daigaku $; proc corr data=zenin; var shintyou taijyuu kyoui; run; prov sort data=zenin; by seibetsu; run; proc corr data=zenin; var shintyou taijyuu kyoui; by seibetsu; run;
/* Lesson 6-6 */ /* File Name = reg01.sas 11/15/96 */ data zenin; infile 'all.dat'; input seibetsu $ shintyou taijyuu kyoui kozukai jitaku $ daigaku $; proc reg data=zenin; model shintyou=taijyuu; run;
/* Lesson 6-7 */ /* File Name = freq01.sas 11/15/96 */ data zenin; infile 'all.dat'; input seibetsu $ shintyou taijyuu kyoui kozukai jitaku $ daigaku $; proc freq data=zenin; tables seibetsu; run; proc freq data=zenin; tables seibetsu*jitaku; run;
/* Lesson 6-8 */
/* File Name = freq02.sas 11/15/96 */
data zenin;
infile 'all.dat';
input seibetsu $ shintyou taijyuu kyoui kozukai jitaku $ daigaku $;
proc format; : 新しい階級(変数名:class)を作る
value class low-<150=' -149' :
150-<160='150-159' :
160-<170='160-169' :
170-high='170- ' :
other ='missing'; :
run; :
proc freq data=zenin; :
tables shintyou; : (一重クロス)集計
format shintyou class.; :
run; :
:
proc freq data=zenin; :
tables shintyou*seibetsu; : 二重クロス集計
format shintyou class.; :
run; :
:
proc freq data=zenin; :
tables shintyou*seibetsu*jitaku; : 三重クロス集計
format shintyou class.; :
run; :
/* Lesson 6-9 */
/* File Name = freq03.sas 11/15/96 */
data zenin;
infile 'all.dat';
input seibetsu $ shintyou taijyuu kyoui kozukai jitaku $ daigaku $;
proc format;
value class low-<150=' -149'
150-<160='150-159'
160-<170='160-169'
170-high='170- '
other ='missing';
run;
proc tabulate data=zenin;
class shintyou seibetsu;
var taijyuu;
tables taijyuu*(n mean std),shintyou*seibetsu;
format shintyou class.;
run;