A question about inserting data in SAS

是 否 +2 论坛币

k人 参与回答

经管之家送您一份

应届毕业生专属福利!

求职就业群

赵安豆老师微信：zhaoandou666

经管之家联合CDA

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

立即领取

感谢您参与论坛问题回答

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

+2 论坛币

I have a question about inserting data in SAS.
For example, I have a data set:

data a;
input   n   x;
cards;
1   10                                                                                       
2   11.5                                                                                                                                 
4   12                                                                                                                                    
5   10.6                                                                                                                                 
7   9.8
;
run;

As there is no data for n=3,6, then I want to create the value n=3 and n=6 with coressponding x=(11.5+12)/2 and x=(10.6+9.8)/2. How can I do so?
The final data set should look like this:

n   x
1   10
2   11.5   
3   11.75                                                                                                                              
4   12                                                                                                                                    
5   10.6         
6   10.2                                                                                                                        
7   9.8

扫码加我 拉你入群

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

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

分享0 收藏0 回帖

关键词：question insert About Quest Bout question about

data b(drop=x_1 x_2);
retain x_1 x_2;
set a;
output;
if  n in (4,7) then
  do;
    n=n-1;
    x=(x+x_2)/2;
    output;
  end;
x_1=x;
x_2=x_1;
run;
proc sort;
by n;
run;
proc print;
run;

楼上高人，学习

davil2000 发表于 2012-11-10 18:06
data b(drop=x_1 x_2);
retain x_1 x_2;
set a;

Thank a lot! What is the purpose of creating x_2? Why can't I simply use x=(x+x_1)/2?

lam_fukming 发表于 2012-11-11 16:24
Thank a lot! What is the purpose of creating x_2? Why can't I simply use x=(x+x_1)/2?

pls run the codes below, then you can find your results.

data b;
retain x_1 x_2;
set a;
output;
if  n in (4,7) then
  do;
    n=n-1;
    x=(x+x_2)/2;
    output;
  end;
x_1=x;
x_2=x_1;
run;

proc print;
run;

davil2000 发表于 2012-11-11 16:49
pls run the codes below, then you can find your results.

data b;

I use the same method for data with different gaps, but the result is not exactly the same as what I expect.
For example,

data a;                                                                                                                                   
input   n   x;                                                                                                                           
cards;                                                                                                                                    
1   10                                                                                                                                    
2   11.5                                                                                                                                 
4   12                                                                                                                                    
5   10.6                                                                                                                                 
7   9.8                                                                                                                                   
10   10.1                                                                                                                                 
11  12                                                                                                                                    
;                                                                                                                                         
run;                                                                                                                                      

data b;                                                                                                                                   
retain x_1 x_2;                                                                                                                           
set a;                                                                                                                                    
output;                                                                                                                                   
if  _n_ in (3,5) then                                                                                                                     
   do;                                                                                                                                    
    n=n-1;                                                                                                                                
    x=(x+x_2)/2;                                                                                                                          
    output;                                                                                                                              
  end;                                                                                                                                    
if  _n_ in (6) then                                                                                                                       
   do j=1 to 2;                                                                                                                           
    n=n-1;                                                                                                                                
    x=(x_2)*j/3 + x*(3-j)/3;                                                                                                                     
    output;                                                                                                                              
  end;                                                                                                                                    

x_1=x;                                                                                                                                    
x_2=x_1;                                                                                                                                 
run;                                                                                                                                      

proc sort data=b;                                                                                                                        
by n;                                                                                                                                    
run;                                                                                                                                      
proc print;                                                                                                                              
run;

The result is as follow:


It is different from the expected result for n= 8, 9

n      x
8      9.9
9      10

lam_fukming 发表于 2012-11-11 20:24
I use the same method for data with different gaps, but the result is not exactly the same as what ...

data a;                                                                                                                                   
input   n   x;                                                                                                                           
cards;                                                                                                                                    
1   10                                                                                                                                    
2   11.5                                                                                                                                 
4   12                                                                                                                                    
5   10.6                                                                                                                                 
7   9.8                                                                                                                                   
10   10.1                                                                                                                                 
11  12                                                                                                                                    
;                                                                                                                                         
run;      

data b;
   set a;
   by n;
   output;
   lastn=lag(n); lastx=lag(x);
   if _n_>1 and  n ne lastn+1 then do;
         gapn=n-lastn;
                 gapx=x-lastx;
         do i=1 to gapn-1;
                    n=lastn+i; x=lastx+gapx/gapn*i;
                    output;
                 end;           
      end;
        drop gapn gapx lastn lastx i;
run;

proc sort data=b;                                                                                                                        
by n;                                                                                                                                    
run;                                                                                                                                      
proc print;                                                                                                                              
run;