求助 如何能让每家公司的ID都统一为 该公司第一个出现的non-missing ID?

是 否 +2 论坛币

k人 参与回答

经管之家送您一份

应届毕业生专属福利!

求职就业群

赵安豆老师微信：zhaoandou666

经管之家联合CDA

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

立即领取

感谢您参与论坛问题回答

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

+2 论坛币

请教高手，如何能让每家公司的ID都统一为该公司第一个出现的non-missing ID？
比如：
Co
date
id
1001 200509 2
1001 200510 6
1001 200511 2
1001 200512 6
1119 200112 .
1119 200201 .
1119 200202 6
1119 200203 8

变成：
Co
date
id
1001 200509 2
1001 200510 2
1001 200511 2
1001 200512 2
1119 200112 .
1119 200201 .
1119 200202 6
1119 200203 6

该如何编code?
输入语句如下：
data a;

input company date:yymmn6. id;

format date yymmn6.;

datalines;
1001 200509 2
1001 200510 6
1001 200511 2
1001 200512 6
1119 200112 .
1119 200201 .
1119 200202 6
1119 200203 8

;
run;

扫码加我 拉你入群

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

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

分享0 收藏0 回帖

关键词：missing SSIN Miss Iss ING

data a;

input company date:yymmn6. id;

format date yymmn6.;

if missing(id) then mis='yes';
else mis='no';

datalines;
1001 200509 2
1001 200510 6
1001 200511 2
1001 200512 6
1119 200112 .
1119 200201 .
1119 200202 6
1119 200203 8

;
run;


proc sort data=a;
  by company mis date ;
run;

data a(drop=mis tempid);
  set a;
  by company mis date;
  retain tempid;
  if first.company then tempid=id;
  id=tempid;
  if mis='yes' then id=.;
run;

proc sort data=a;
  by company date ;
run;

中间一步是不是要改下?
data a(drop=mis tempid);
  retain tempid;
  set b;
  by company mis date;
  if first.company then tempid=id;
  id=tempid;
run;

我的会把miss给盖掉，没考虑清楚，楼主无视我吧。。。

data a;

input company date:yymmn6. id;

format date yymmn6.;

datalines;
1001 200509 2
1001 200510 6
1001 200511 2
1001 200512 6
1119 200112 .
1119 200201 .
1119 200202 6
1119 200203 8

;
run;

proc sort data=a;
  by company date ;
run;

data a0(drop = date rename = (id=newid));
  set a;
  by company date;
  if id ne .;
  if first.company;
run;

data b(drop = id);
merge a a0;
by company;
run;

调整一下应该可以了；
data a;

input company date:yymmn6. id;

format date yymmn6.;

datalines;
1001 200509 2
1001 200510 6
1001 200511 2
1001 200512 6
1119 200112 .
1119 200201 .
1119 200202 6
1119 200203 8

;
run;

proc sort data=a;
  by company date ;
run;

data a0(drop = date rename = (id=newid));
  set a;
  by company date;
  if id ne .;
  if first.company;
run;

data b(drop = id);
merge a a0;
by company;
if id = . then newid=.;
run;

I really appreciate your help. That code's so helpful.

刚试用了楼上各位的方法，还是二楼的code最正确，是我所需要的，非常感谢！
三楼，五楼的方法没有能够识别missing values。
anyway,还是非常感谢楼上诸位！！！

发现了新的问题，我要的: 让每家公司的ID都统一为该公司第一个出现的non-missing ID。
也就是说，如果数据后面出现了missing值，还是一样要和第一个nonmissing id值一样，但二楼的方法在这一点上不适用了。
比如：
Co  date  id
1001 200509 2
1001 200510 6
1001 200511 .   需要变2
1001 200512 6
1119 200112 .    一开始的missing值 不需要变
1119 200201 .   一开始的missing值 不需要变
1119 200202 6
1119 200203 .    需要变6
1119 200204 8
   变成：
Co  date  id
1001 200509 2
1001 200510 2
1001 200511 2
1001 200512 2
1119 200112 .
1119 200201 .
1119 200202 6
1119 200203 6
1119 200204 6
望高手 再次出手相助！

funwin 发表于 2010-4-2 04:54
发现了新的问题，我要的: 让每家公司的ID都统一为该公司第一个出现的non-missing ID。
也就是说，如果数据后面出现了missing值，还是一样要和第一个nonmissing id值一样，但二楼的方法在这一点上不适用了。
比如：
Co  date  id
1001 200509 2
1001 200510 6
1001 200511 .   需要变2
1001 200512 6
1119 200112 .    一开始的missing值 不需要变
1119 200201 .   一开始的missing值 不需要变
1119 200202 6
1119 200203 .    需要变6
1119 200204 8
   变成：
Co  date  id
1001 200509 2
1001 200510 2
1001 200511 2
1001 200512 2
1119 200112 .
1119 200201 .
1119 200202 6
1119 200203 6
1119 200204 6
望高手 再次出手相助！

1. 
   
2. PROC SORT OUT = A; BY company; RUN;
   
3. DATA B;
   
4. DO UNTIL(LAST.company);
   
5.   SET A; BY company;
   
6.   IF (NOT MISSING(ID)) THEN DO;
   
7.    _ID = ID;
   
8.    LEAVE;
   
9.   END;
   
10. END;
    
11. DO UNTIL(LAST.company);
    
12.   SET A; BY company;
    
13.   New_ID =  _ID;
    
14.   sum1 = SUM(sum1, 1);
    
15.   sum2 = SUM(sum2, MISSING(ID));
    
16.   IF (MISSING(ID) AND sum1 = sum2) THEN CALL MISSING(New_ID);
    
17.   OUTPUT;
    
18. END;
    
19. DROP _ID sum:;
    
20. RUN;

复制代码

牛！！！
非常感谢jingju11, 受益匪浅!!!