proc expand question

art297 — Tue, 10 Mar 2015 00:06:48 GMT

Just out of curiosity, can someone post a proc expand solution to the problem posed in the thread:

TIA,

Art

Re: proc expand question

FriedEgg — Tue, 10 Mar 2015 02:14:08 GMT

@art297,

I posted a PROC EXPAND example and another using PROC TRANSREG for good measure.

For further reading I would recommend the following topic from SAS-L:

PGStats — Tue, 10 Mar 2015 02:46:06 GMT

In this particular case, one must do a little gymnastics to fix the beginning and end of the series :

data temp(drop=i first:) first(keep=first:);

set have end=done;

array v{*} v:;

array first{1024} (1024*.);

do i = 1 to dim(v);

if v{i}=0 then call missing (v{i});

else if missing(first{i}) then first{i} = v{i};

end;

output temp;

if done then output first;

run;

proc expand data=temp out=expanded;

id id;

convert v: / method=join;

run;

data want;

if _n_=1 then set first;

set expanded;

array v{*} v:;

array first{*} first:;

do i = 1 to dim(v);

if missing(v{i}) then

if missing(first{i}) then v{i} = 0;

else v{i} = first{i};

else call missing(first{i});

end;

drop i first:;

run;