data have; input ID$ MAXVEL seq_id; cards; A 15 1 A 27 2 A 29 3 A 52 4 B 60 1 B 26 2 B 40 3 B 2 4 B 9 5 B 45 6 C 60 1 C 12 2 C 60 3 C 50 4 C 12 5 ; data want; length cnt $10; set have; by id; retain cnt val; if first.id then do;cnt='';val=.;end; if maxvel >25 then check='1'; if check ne '' then cnt=cats(check,cnt); if check='' then cnt=''; if cnt in ('1','11') then do; val+maxvel; end; seq=lag(seq_id); if check='' then val=.; if cnt='11' then val=val/2; if val in (26:50) then out='Medium'; else if val in (51:60) then out='High'; run; proc sort data=want; by id seq_id ; run; data want2(drop=_cnt check seq cnt ); merge want(in=a rename=(cnt=_cnt) drop=val out) want(in=b keep=id val out seq cnt rename=(seq=seq_id) where=(cnt='11')); by id seq_id; if a; run; ... View more

  Please try this untested code, before that sort the data using proc sort   data want; length newitem $100.; set have; by item1 item2 item3 ; retain newitem; if first.item1 then newitem=''; if item3 ne '' then newitem=catx(' ', item3,newitem); run; ... View more

  data have; input ID visit; cards; 01 30 01 34 01 39 01 45 02 35 02 40 02 42 ; data want; set have; by id visit; want=visit-lag(visit); if first.id then want=0; run; ... View more

Alternatively with perl regular expression   data test1; input Names:$100.; names=prxchange('s/\_\d+//',-1,compress(names)); put names=; datalines; dx_1 dx_10 state_id_5 state_id_9 if_mg_hk_4 ; run; ... View more

Consider that you have the dataset with name have and you need to create a variable date in want. so you could follow as below   the date will create dates from 01jul2017 to 21jul2017 depending on the number of rows   data want; do until(date ne .); set have; date=intnx('day','01jul2017'd,_n_); end; format date date9.; run; ... View more

Consider that you have a dataset with miles and you want to create a new dataset creating a new variable and if this new variable values reaches the 250 mark then you need to stop. Use the do until as i used.   data have; do miles=100 to 1000 by 50; output; end; run; data want; do until(mile<=250); set have; mile=miles; end; run; ... View more