sas数据集例题

1、 试验目的本实验主要练习数据集的导入和导出，建立、删除和保留变量、数据集的合并与拆分，排序、转置等操作。掌握从已有数据文件建立数据集以及在已有数据集的基础上建立、删除变量；掌握sas的程序控制的三种基本控制流；掌握数据数据修正、排序、转置和标准化的过程或语句。实验内容完成下列各题一某班12 名学生3 门功课成绩如下：用sas的data步建立数据集。筛选出有一科不及格的学生。计算每人平均成绩，并按五级制评定综合成绩。二 教材P141的6,7题。三 data2_1.sav和data2_2.sav是一组被试（编号1-47）分别做两个量表数据，请把它们合并起来，保存为“量表.sav”,data2_3.

2、sav是另一组被试（编号48-65）做成量表的数据，请把这些数据加到“量表.sav”里，并保存。1) a1、a5、a30、a43、a49和b2、b6、b19为反向计分，把他们转化为正向。2) data2_1.sav和data2_2.sav是一组被试（编号1-47）分别做两个量表的数据，请把它们合并起来，保存为“量表.sav”,data2_3.sav是另一组被试（编号48-65）做成量表的数据，请把这些数据加到“量表.sav”里，并保存。3) a1到a25为a量表的第一个维度，a26到a50为第二个维度，b量表只有一个维度，分别求出三个维度的总分（即所有项目得分相加）。4) 把b量表总分按照从小

3、到大的顺序排列，设置另外一个变量（group），b量表得分前十名赋值“1”，标签为“高分组”，后十名赋值“3”，标签为“低分组”，其它赋值“2”，标签为“中间组”。5) 各维度总分中如果有缺失，请用该维度的平均分进行替换。结果分析一、(1)data class;input id biochemistry$physical pathology;label id='学号' biochemistry='生化' physical='物理' pathology='病理'cards;083 68 71 65084 74 61 68085 73

4、 75 46087 75 71 68084 85 85 87085 78 79 75086 80 76 79089 67 73 71118 70 54 75083 70 66 84084 62 73 65099 82 70 79;run;proc print data=class label;run;(2)(3)data class;input id biochemistry $ physical $ pathology $ ave $ ;label id='学号' biochemistry='生化' physical='物理' patholog

5、y='病理'ave=mean(biochemistry,physical,pathology); if ave<60then ave='E' if 60<=ave<70then ave='D' if 70<=ave<=79then ave='C' if 80<=ave<=89then ave='B' if 90<=ave<=100then ave='A' return;cards;083 68 71 65084 74 61 68085 73 75

6、 46087 75 71 68084 85 85 87085 78 79 75086 80 76 79089 67 73 71118 70 54 75083 70 66 84084 62 73 65099 82 70 79;proc print;run;二6.libname sas7bdat'c:saslx'data student;infile 'c:sasdtstudent.txt'length id $18;length name $16;input id $ name $ English conputer;age= 2015-input(substr(i

7、d,7,4),4.);if mod(substr(compress(id),17,1),2) then sex='1'else sex='2'drop id;run;data sas7bdat.mstu;set student;if sex=1;keep name age sex English computer;data sas7bdat.fstu;set student;if sex=2;keep name age sex English computer;run;proc print;run;7.libname sas7bdat'c:saslx&#

8、39;data student;infile 'c:sasdtstudent.txt'length id $18;length name $16;input id $ name $ English conputer;age= 2015-input(substr(id,7,4),4.);if mod(substr(compress(id),17,1),2) then sex='1'else sex='2'drop id;run;data sas7bdat.stu90;set student;where English>90 and conpu

9、ter>90;run;proc print;run;三首先导入数据集 data liangbiao; MERGE D1 D2; data lb; set liangbiao D3; proc export data=lb outfile="d:cymSAS作业量表.sav" REPLACE ; data lb; array lb72 a1-a50 b1-b22; set lb; lb(1)=6-lb(1);lb(5)=6-lb(5);lb(30)=6-lb(30);lb(43)=6-lb(43); lb(49)=6-lb(49);lb(52)=6-lb(52);lb(

10、56)=6-lb(56);lb(69)=6-lb(69); sum1=sum(of a1-a25); sum2=sum(of a26-a50); sum3=sum(of b1-b22); data lb; set lb; proc standard data=lb out=lb replace; var sum1 sum2 sum3; run; proc sort data=lb; by sum3; data cheng; input group ; datalines; 1 1 1 1 1 1 1 1 1 1 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 3 3 3 3 3 3 3 3 3 3 run; data lg; MERGE lb