sas 急急急！如何插入行，使新行数据等于前一行，直到。。

是 否 +2 论坛币

k人 参与回答

经管之家送您一份

应届毕业生专属福利!

求职就业群

赵安豆老师微信：zhaoandou666

经管之家联合CDA

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

立即领取

感谢您参与论坛问题回答

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

+2 论坛币

现在我有一个数据文件，有6个变量，
date,               time,       sa,      sx,          sy,         sz,
22/08/2012     00:01      0.32    14.55     90.32     104.55
22/08/2012     00:02      0.34    14.56     90.34     104.78
22/08/2012     00:04      0.33    14.60     90.52     104.68
22/08/2012     00:08      0.31    14.44     90.50     104.59



我想按每秒的时间间隔，自动填充数据，比如：00:03秒时，该行记录等于上一秒记录，每次增加一行，直到该时间有记录。

date,               time,       sa,      sx,          sy,         sz,
22/08/2012     00:01      0.32    14.55     90.32     104.55
22/08/2012     00:02      0.34    14.56     90.34     104.78
22/08/2012     00:03      0.34    14.56     90.34     104.78
22/08/2012     00:04      0.33    14.60     90.52     104.68
22/08/2012     00:05      0.33    14.60     90.52     104.68
22/08/2012     00:06      0.33    14.60     90.52     104.68
22/08/2012     00:07      0.33    14.60     90.52     104.68
22/08/2012     00:08      0.31    14.44     90.50     104.59



希望大神指导。 非常感谢！！！！

扫码加我 拉你入群

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

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

分享0 收藏1 回帖

关键词：time date 时间间隔 非常感谢 数据文件 如何

有人可以帮助解决吗？

这种填充缺失数据的代码，最恶心了。。。。。必须打赏啊。。

1. data a;
   
2.         input date time sa sx sy sz;
   
3.         informat date ddmmyy8. time time6.;
   
4.         format date ddmmyy8. time time6.;
   
5.         datalines;
   
6. 22/08/2012 00:01 0.32 14.55 90.32 104.55
   
7. 22/08/2012 00:02 0.34 14.56 90.34 104.78
   
8. 22/08/2012 00:04 0.33 14.60 90.52 104.68
   
9. 22/08/2012 00:08 0.31 14.44 90.50 104.59
   
10. 22/08/2012 00:09 0.31 14.44 90.50 104.59
    
11. 22/08/2012 00:13 0.31 14.44 90.50 104.59
    
12. ;
    
13. run;
    
14. 
    
15. data b c;
    
16.         set a;
    
17.         retain timez timex saz sxz syz szz;
    
18.         by date;
    
19. 
    
20.         if first.date then
    
21.                 do;
    
22.                         saz=sa;
    
23.                         sxz=sx;
    
24.                         syz=sy;
    
25.                         szz=sz;
    
26.                         timez=time;
    
27.                         output b;
    
28.                 end;
    
29.         else
    
30.                 do;
    
31.                         if time-timez eq 60 then
    
32.                                 do;
    
33.                                         saz=sa;
    
34.                                         sxz=sx;
    
35.                                         syz=sy;
    
36.                                         szz=sz;
    
37.                                         timez=time;
    
38.                                         output b;
    
39.                                 end;
    
40.                         else
    
41.                                 do;
    
42.                                         output b;
    
43.                                         timex=time;
    
44.                                         do i=1 to (time-timez-60) by 60;
    
45.                                                 asd=time;
    
46.                                                 asddd=timez;
    
47.                                                 time=timez+60;
    
48.                                                 sa=saz;
    
49.                                                 sx=sxz;
    
50.                                                 sz=szz;
    
51.                                                 sy=syz;
    
52.                                                 timez=timez+60;
    
53.                                                 output c;
    
54.                                         end;
    
55.                                         timez+60;
    
56.                                 end;
    
57.                 end;
    
58. 
    
59.         format timez asd asddd time6.;
    
60. run;
    
61. 
    
62. data d;
    
63.         set b c;
    
64.         keep date time sz sy sa sx;
    
65.         run;

复制代码

data a;
        input date time sa sx sy sz;
        informat date ddmmyy8. time time6.;
        format date ddmmyy8. time time6.;
        datalines;
22/08/2012 00:01 0.32 14.55 90.32 104.55
22/08/2012 00:02 0.34 14.56 90.34 104.78
22/08/2012 00:04 0.33 14.60 90.52 104.68
22/08/2012 00:08 0.31 14.44 90.50 104.59
22/08/2012 00:09 0.31 14.44 90.50 104.59
22/08/2012 00:13 0.31 14.44 90.50 104.59
;
run;

proc sort; by date time; run;

data b;
merge a a(firstobs=2 keep=time rename=(time=time1));
run;

data c;
set b;
by date time;
retain time;
if last.date then time1=.;
dif=(time1-time);
output;
if dif>60 then do until (time=time1-60);
time=time+60;
output;
end;
run;

data a;
        input date time sa sx sy sz;
        informat date ddmmyy8. time time6.;
        format date ddmmyy8. time time6.;
        datalines;
22/08/2012 00:01 0.32 14.55 90.32 104.55
22/08/2012 00:02 0.34 14.56 90.34 104.78
22/08/2012 00:04 0.33 14.60 90.52 104.68
22/08/2012 00:08 0.31 14.44 90.50 104.59
22/08/2012 00:09 0.31 14.44 90.50 104.59
22/08/2012 00:13 0.31 14.44 90.50 104.59
;
run;

proc sort; by date time; run;

data b;
merge a a(firstobs=2 keep=time rename=(time=time1));
run;

data c;
set b;
by date time;
retain time;
if last.date then time1=.;
dif=(time1-time);
output;
if dif>60 then do until (time=time1-60);
time=time+60;
output;
end;
run;

如果你确认00:03那个世界单位是秒，就这样试试：

data a;
input date ddmmyy10. @12time time8. sa sx sy sz;
format date ddmmyy10. time time8.;
cards;
22/08/2012 0:00:01 0.32 14.55  90.32 104.55
22/08/2012 0:00:02 0.34 14.56  90.34 104.78
22/08/2012 0:00:04 0.33 14.60  90.52 104.68
22/08/2012 0:00:08 0.31 14.44  90.50 104.59
;
run;
data b;
set a ;
timel=lag(time); sal=lag(sa); sxl=lag(sx); syl=lag(sy); szl=lag(sz);
output;
dif=time-timel;
if dif>1 then do until (time=timel+1);
timel = timel +1;
output;
end;
keep date timel sal sxl syl szl;
run;
data c;
merge a b(firstobs=2 rename=(timel=time sal=sa sxl=sx syl=sy szl=sz));
by time;
run;

如果确认时间00:01为秒，就试一下这个：

data a;
input date ddmmyy10. @12time time8. sa sx sy sz;
format date ddmmyy10. time time8.;
cards;
22/08/2012 0:00:01 0.32 14.55  90.32 104.55
22/08/2012 0:00:02 0.34 14.56  90.34 104.78
22/08/2012 0:00:04 0.33 14.60  90.52 104.68
22/08/2012 0:00:08 0.31 14.44  90.50 104.59
;
run;
data b;
set a ;
timel=lag(time); sal=lag(sa); sxl=lag(sx); syl=lag(sy); szl=lag(sz);
output;
dif=time-timel;
if dif>1 then do until (time=timel+1);
timel = timel +1;
output;
end;
keep date timel sal sxl syl szl;
run;
data c;
merge a b(firstobs=2 rename=(timel=time sal=sa sxl=sx syl=sy szl=sz));
by time;
run;