8A版SAS数据集例题

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

2、个量表数 据，请把它们合并起来，保存为“量表 .sav ” ,data2_3.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.sa v 是另一组被 试（编号 48-65 ）做成量表的数据，请把这些数据加到“量表 .sav ”里， 并保存。3）a1 到 a25 为 a

3、量表的第一个维度， a26 到 a50 为第二个维度， b 量表只有 一个维度，分别求出三个维度的总分（即所有项目得分相加） 。4）把 b 量表总分按照从小到大的顺序排列，设置另外一个变量（group ），b量表得分前十名赋值“ 1”，标签为“高分组”，后十名赋值“ 3”，标签 为“低分组”，其它赋值“ 2”，标签为“中间组”。5）各维度总分中如果有缺失，请用该维度的平均分进行替换。(1) data class;MeiWei81- 优质实用版文档】MeiWei81- 优质实用版文档】input idbiochemistry$physicalpathology;label id= 学号 bioc

4、hemistry= 生化 physical= 物理 pathology=理 ; cards ;083687165084746168085737546087757168084858587085787975 086807679 089677371 118705475 083706684 084627365 099827079run ;procprint data =class labelrun ;(3)data class;input idbiochemistry$physical$pathology$ave$;label id= 学号 biochemistry= 生化 physical= 物理

5、pathology= 理 ;ave=mean(biochemistry,physical,pathology);if ave 60 then ave= E ;if 60 =ave 70 then ave= D ;if 70 =ave= 79 then ave= C ;if 80 =ave= 89 then ave= B ; if 90 =ave 90 andconputer 90 run ;procprint ;run ;首先导入数据集MeiWei81- 优质实用版文档】MeiWei81- 优质实用版文档】data liangbiao;MERGED1D2;data lb;setliangbia

6、oD3;proceGport data=lboutfile=d:cymSAS 作业 量表 .savREPLACE;data lb;arraylb 72a1-a50b1-b22;setlb;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( 56)= 6-lb( 56);lb( 69)= 6-lb( 69); sum1=sum(ofa1-a25);sum2=sum(ofa26-a50); sum3=sum(ofb1-b22);data lb; setlb;procstandard data=lbout=lbreplace;varsum1sum2sum3;run;procsort data=lb;bysum3;data cheng;inputgroup;datalines;11111111112222222222222222222222222222222222222222222223333333333 run;data lg;MERGElbcheng;run;data lg;setlg;if(group= 1)thensum= 高分组 ;if(group= 2)t