楼主: b28709145
1943 5

请教sas 阵列问题 [推广有奖]

  • 0关注
  • 0粉丝

初中生

9%

还不是VIP/贵宾

-

威望
0
论坛币
23 个
通用积分
0
学术水平
0 点
热心指数
0 点
信用等级
0 点
经验
105 点
帖子
8
精华
0
在线时间
3 小时
注册时间
2009-4-22
最后登录
2009-11-9

楼主
b28709145 发表于 2009-8-11 21:32:24 |AI写论文

+2 论坛币
k人 参与回答

经管之家送您一份

应届毕业生专属福利!

求职就业群
赵安豆老师微信:zhaoandou666

经管之家联合CDA

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

感谢您参与论坛问题回答

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

+2 论坛币
各位大大 ,小弟有个阵列上的问题,烦请协助

问题如下:

         班车     总时间(分钟)        上车时间         下车时间
          A1           50                           7:30                 8:20
          A2           80                           8:20                 9:40
          A3          100                          9:40                11:20

             请问SAS如何写该程式

                                                                                     谢谢
二维码

扫码加我 拉你入群

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

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

关键词:如何写 请教 SAS 阵列

回帖推荐

jingju11 发表于3楼  查看完整内容

data timeInput; retain x; input shuttle $ time inTime: time.; if _n_=1 then do; outTime=InTime+time*60; x=outTime; end; if _n_>1 then do; inTime=x; outTime=InTime+time*60; x=outTime; end; format inTime outTime hhmm.; drop x; cards; A1 50 7:30 A2 80 . A3 100 . ; run; proc print;run;

本帖被以下文库推荐

沙发
b28709145 发表于 2009-8-11 21:42:38
不好意思,以上问题,只有班车,总时间,及第一班上车时间为已知7:30
其它都是要用程式计算出来的结果

藤椅
jingju11 发表于 2009-8-11 22:36:42
data timeInput;
        retain x;
        input shuttle $ time inTime: time.;
        if _n_=1 then do;
                outTime=InTime+time*60;
                x=outTime;
        end;
        if _n_>1 then do;
                inTime=x;
                outTime=InTime+time*60;
      x=outTime;
        end;
        format inTime outTime hhmm.;
        drop x;
cards;
A1    50 7:30  
A2    80  .
A3   100 .
;
run;


proc print;run;
已有 1 人评分经验 论坛币 收起 理由
bakoll + 3 + 3 精彩帖子

总评分: 经验 + 3  论坛币 + 3   查看全部评分

板凳
b28709145 发表于 2009-8-12 08:06:19
3# jingju11

谢谢您了,
       但如果要加上日期呢?如8/8/23:50
                     总时间为50分钟,
                         让其下车时间为8/9/00:40分呢?????

报纸
chenzl00 发表于 2009-8-12 10:04:55
支持一下
支持一下
支持一下

地板
jingju11 发表于 2009-8-13 00:11:20
data timeInput;
        
        input shuttle $ time inTime: datetime.;
                  retain outTime;
        if _n_=1 then do;
                outTime=intnx('minute',InTime,time);
        end;
        if _n_>1 then do;
                inTime=OutTime;
                 outTime=intnx('minute',InTime,time);*unit by minute;
        end;
        format inTime outTime datetime13.;
cards;
A1    50  08mar07:7:30  
A2    80   .
A3   100  .
A4  1005 .
;
run;


proc print;run;
*没有年份的月日有时是没有意义的;

您需要登录后才可以回帖 登录 | 我要注册

本版微信群
加好友,备注cda
拉您进交流群
GMT+8, 2026-1-7 19:05