求问怎么写宏将一个数据集的按某一个变量取值来拆分数据集，并对生成的每个数据集做分

是 否 +2 论坛币

k人 参与回答

经管之家送您一份

应届毕业生专属福利!

求职就业群

赵安豆老师微信：zhaoandou666

经管之家联合CDA

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

立即领取

感谢您参与论坛问题回答

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

+2 论坛币

我现在想写的一个宏的需求是这样的，有一张表，其中有3列，第一列是行业编号，第二列是和第三列分别是2个数值变量（后面分析使用到）。行业编号的取值水平有400多个（不固定，随时间在变化），每个取值水平有若干个观测（大多在180左右）
1：首先，我想把这张表按照行业编号的取值进行表拆分，拆分后的每个数据集以 ”ds_行业编号取值" 命名，这一步生成400多个行业数据集
2：对400个数据集的第二列和第三列进行0-1标准化（ 公式：value-min/max-min ）
3：对标准化后的数据集进一步处理

现在碰到的问题是第1步和第2步怎么用宏来写，数据集以SASHELP.PRDSAL2为例吧，假设PRODTYPE是行业编号，ACTUAL和PREDICT分别是第二列和第三列

扫码加我 拉你入群

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

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

关键词：数据集 predict SASHELP actual value 命名 行业 左右

没示例数据，想起来比较抽象~~

应该还有一列是时间

下面是实现拆分的，稍微改下就可以实现2、3，自己动手吧，输入数据集第一列必须为分类变量

1. /*按变量值拆分数据集*/
   
2. %macro split(ds);
   
3.         %let dsid=%sysfunc(open(&ds));
   
4.         %if &dsid gt 0 %then %let typename=%sysfunc(varname(&dsid,1));/*获取分类变量名*/
   
5.         %let dsid=%sysfunc(close(&dsid));
   
6.         proc sql noprint;
   
7.         select distinct &typename into: names separated by ','/*所有类别放入宏names，逗号分隔*/
   
8.         from &ds;
   
9.         quit;
   
10.         %let i=1;
    
11.         %do %while(%scan(%quote(&names),&i,',') ne %str());/*子串不为空是循环拆分数据集*/
    
12.                 %let dname=%scan(%quote(&names),&i,',');
    
13.                 data ds_&dname;
    
14.                 set &ds;
    
15.                 where &typename = "&dname";
    
16.                 run;
    
17.                 %let i=%eval(&i.+1);
    
18.         %end;
    
19. %mend split;
    
20. 
    
21. proc sql;
    
22. create table test as
    
23. select PRODTYPE,ACTUAL,PREDICT
    
24. from SASHELP.PRDSAL2;
    
25. quit;
    
26. %split(test);

复制代码

木叶知秋 发表于 2015-10-24 12:07
下面是实现拆分的，稍微改下就可以实现2、3，自己动手吧，输入数据集第一列必须为分类变量

非常好，赞！谢谢！

收下了  谢谢

木叶知秋 发表于 2015-10-24 12:07
下面是实现拆分的，稍微改下就可以实现2、3，自己动手吧，输入数据集第一列必须为分类变量

学到了！！太感谢了，大佬！救命了