如何整理？谢谢！

shiyiming

data aaa;
input name$ value@@;
cards;
RBC  5
RBC  4
RBC  6
HB    110
HB    100
HB    90
ALT   60
ALT   40
run;
希望得到的数据：
name value
RBC  5
空   4
空    6
HB    110
空    100
空      90
ALT   60
空      40
要求数据的顺序不变，谢谢！

shiyiming

空表示缺失

shiyiming

[code:1bjedzg5]
data aaa;
input name$ value@@;
cards;
RBC 5
RBC 4
RBC 6
HB 110
HB 100
HB 90
ALT 60
ALT 40
run;
/*方法一*/
data a(drop=flag);
  set aaa;
  flag=lag(name);
  if name=flag then name='';
run;
/*方法二*/
data b(drop=flag);
   length name $8;
   if _n_=1 then do;
   declare hash h();
   h.definekey('name');
   h.definedata('name');
   h.definedone();
   end;
   set aaa(keep=name);
   if h.find()^=0 then h.add();
   else flag=1;
   set aaa;
   if h.find()=0 and flag=1 then do;
      name='';
   end;
output;
run;
[/code:1bjedzg5]

shiyiming

[code:141goc2v]data want;
        set aaa;
        by name notsorted;
        if first.name then name=name;
                else name=' ';
run;[/code:141goc2v]

shiyiming

[quote:1inolrba]由 gpcy » 2011-7月-04 08:58
data want;
   set aaa;
   by name notsorted;
   if first.name then name=name;
      else name=' ';
run;
[/quote:1inolrba]

shiyiming

学习了，高手很多啊，佩服! 谢谢!

shiyiming

[quote="gpcy":140dde9m][code:140dde9m]data want;
        set aaa;
        by name notsorted;
        if first.name then name=name;
                else name=' ';
run;[/code:140dde9m][/quote:140dde9m]

一级会员的程序写得也这么的好啊。
[code:140dde9m]data want;
        set aaa;
        by name notsorted;
        if not first.name then name=' ';       
run;[/code:140dde9m]

shiyiming

[quote:2hzgpt93]data want;
   set aaa;
   by name notsorted;
   if not first.name then name=' ';   
run;[/quote:2hzgpt93]
学习了。。