楼主: 拉登大叔
3691 1

[问答] 怎么删除sas中多余的列向量和排序?? [推广有奖]

  • 0关注
  • 0粉丝

小学生

42%

还不是VIP/贵宾

-

威望
0
论坛币
0 个
通用积分
0
学术水平
0 点
热心指数
0 点
信用等级
0 点
经验
133 点
帖子
3
精华
0
在线时间
7 小时
注册时间
2013-10-6
最后登录
2013-11-19

楼主
拉登大叔 发表于 2013-10-6 19:19:17 |AI写论文

+2 论坛币
k人 参与回答

经管之家送您一份

应届毕业生专属福利!

求职就业群
赵安豆老师微信:zhaoandou666

经管之家联合CDA

送您一个全额奖学金名额~ !

感谢您参与论坛问题回答

经管之家送您两个论坛币!

+2 论坛币
data b2;
input x3:$8. x4:$8. x5:yymmn5.;
format x5 yymmd5.;
label x3='工号' x4='姓名' x5='出生年月';
cards;
A004        周雄飞        74-04
A007        章琪        63-03
A008        李朝华        52-03
A009        查文良        80-04
A011        李军        73-02
A013        何伟        75-06
A014        肖德琴        75-11
A015        程正启        70-09
F001        周和平        55-01
F002        戴定兰        51-01
F005        闵清        67-01
F008        欧阳昌汉        75-08
F010        肖兰英        66-09
F011        蔡飞        76-11
F013        余薇        79-08
F014        任平        78-07
F015        李炎坤        76-09
L001        车裕斌        65-01
L004        刘成武        66-01
L006        林祺胜        66-08
L007        黄利民        69-01
L008        钟学斌        67-03
L009        何国松        67-01
L011        柯新利        77-09
N001        明平华        56-01
N002        陈佛敏        56-07
N003        戴文华        70-08
N004        焦翠珍        72-03
N005        唐会伏        71-07
N006        厉阳春        73-01
N007        吴进波        72-01
N008        刘重业        54-12
N009        沈振武        72-09
T001        罗健英        68-07
T002        罗菊英        69-09
T003        李莉        72-01
T004        曹喆        80-01
T004        饶玉霞        79-09
T006        庞红        59-08
T007        孔令磷        82-11
T008        张侠        83-04
T009        汪娟        82-08
T010        张志霞        83-11
T011        邓晶晶        84-03
;
data b3;
input x3:$8. x6:$8. x7;
label x3='工号' x6='课时编号' x7='课时数';
cards;
A004        g12        72
A004        t15        54
A007        e20        10
A007        e12        18
A007        c35        72
A008        s01        108
A009        a01        108
A011        b02        54
A011        b35        36
A013        a02        72
F005        e11        36
F005        e12        54
F008        m01        36
F010        m15        54
F011        n22        108
F013        n10        72
L009        d01        36
L009        e13        18
L011        d29        54
N002        f25        108
N003        e17        36
N003        f27        72
N004        f03        54
T004        e19        10
T004        h21        18
T006        h22        10
T007        h13        16
;
run;
data b4;
input x3:$8. x4:$8. x1:$8. x8:$20.;
label x3='工号' x4='姓名' x1='职称' x8='从事专业';
cards;
A004        周雄飞        讲师        儿科
A007        章琪        副教授        临床教学
A008        李朝华        副教授        神经外科
A009        查文良        讲师        外科
A011        李军        讲师        外科
A013        何伟        讲师        外科
A014        肖德琴        讲师        麻醉
A015        程正启        副教授        泌尿外科
F001        周和平        副教授        药物化学
F002        戴定兰        副教授        寄生虫
F005        闵清        副教授        药理学
F008        欧阳昌汉        副教授        药学
F010        肖兰英        副教授        药理学
F011        蔡飞        助教        药理学
F013        余薇        讲师        药理学
F014        任平        讲师        药理学
F015        李炎坤        讲师        药代动力学
L001        车裕斌        教授        地理与土地管理教学
L004        刘成武        教授        地理教学
L006        林祺胜        副教授        地理与土地管理教学
L007        黄利民        副教授        地理与土地管理教学
L008        钟学斌        副教授        地理教学
L009        何国松        副教授        地理信息系统
L011        柯新利        讲师        地理信息系统
N001        明平华        副教授        数学教学
N002        陈佛敏        副教授        计算机教育
N003        戴文华        副教授        计算机应用
N004        焦翠珍        副教授        计算机应用
N005        唐会伏        讲师        计算机教育
N006        厉阳春        讲师        计算机教育
N007        吴进波        讲师        计算机教学
N008        刘重业        助教        计算机
N009        沈振武        讲师        计算机
T001        罗健英        讲师        妇产科
T002        罗菊英        讲师        护理学
T003        李莉        讲师        教师
T004        曹喆        助教        教师
T004        饶玉霞        讲师        护理
T006        庞红        副教授        护理
T007        孔令磷        助教        护理
T008        张侠        助教        护理
T009        汪娟        助教        护理
T010        张志霞        助教        护理
T011        邓晶晶        助教        护理
;
data xin1;
merge b2 b3(in=c);
by x3;
if c=1;
run;
data xin2;
merge xin1(in=a) b4;
by x3;
if a=1;
run;
proc sort data=xin2;
by x1 x3;
run;
proc print data=xin2;
run;
data xin3;
set xin2;
label x9='课时费';
if x1='教授' then x9=x7*40;
if x1='副教授' then x9=x7*30;
if x1='讲师' then x9=x7*20;
if x1='助教' then x9=x7*15;
if 'e10'<=x6<='e20' then do; x9=x9*0.8; end;
else do; x9=x9; end;
proc print data=xin3;
label;
run;
data xin4;
set xin3;
proc print data=xin4 label;
run;
这是程序,怎么删除中多余的列向量和对列向量排序!!?
谢谢了~~

二维码

扫码加我 拉你入群

请注明:姓名-公司-职位

以便审核进群资格,未注明则拒绝

关键词:地理信息系统 format label Input cards 朝华 成武 和平 姓名

沙发
playmore 发表于 2013-10-8 09:40:50
你的问题太简单了,能写出那么长代码的人应该问不出这种问题
去看下SAS的基础教程就好

另外,删除变量(列向量)在Data步里用drop命令
列向量排序的话用proc sort
playmore邀请您访问ChinaTeX论坛!!!进入ChinaTeX论坛

您需要登录后才可以回帖 登录 | 我要注册

本版微信群
加好友,备注cda
拉您进交流群
GMT+8, 2025-12-30 13:01