SAS - 创建具有滞后的不同自变量的组合

时间:2013-06-21 10:23:04

标签: sas

我希望在使用变量名称(例如VarA,VarB,VarC)形成的数据集(在SAS中)中创建动态条目,每个变量都滞后4个。

输入数据集HAVE具有此信息(列名称为变量和值):

Variables Values

VarA          0

VarB          0

VarC          0

Lags          4

并且输出数据集WANT应该如下所示(Var1,Var2和Var3是动态列名,即将1,2,3附加到任何字符串Var)

Var1     Var2      Var3

VarA     VarB      VarC 

VarA1    VarB1     VarC1

..

VarA4    VarB4     VarC4

目的是让这项工作适用于HAVE数据集中的任意数量的变量。

由于

1 个答案:

答案 0 :(得分:1)

以下代码返回您想要的内容。请根据您的需要进行修改。

/*sample input dataset*/
data have;
input Variables $ Values;
datalines;
VarA 0
VarB 0
VarC 0
Lags 4
;
run;
/*get the no. of lags form the input dataset*/
proc sql noprint;
select Values into :num_of_lags from have where upcase(variables)='LAGS';
quit;
/*transpose the input dataset such that the VarA, VarB, VarC are put in columns Var1, Var2, & Var3 respectively*/
/*have_t, the transposed dataset only has 1 row.*/
proc transpose data = have out =  have_t(drop = _name_) prefix = var;
where upcase(variables)  ne 'LAGS';
var variables;
run;
/*replicate the 1 row in have_t num_of_lags times*/
data pre_want;
    set have_t;
    array myVars{*} _character_;
        do j= 1 to &num_of_lags+1;
            do i = 1 to dim(myVars);
            myVars[i]=myVars[i];
            end;
        output;
    end;
run;
/*final dataset*/
data want;
set pre_want;
array myVars{*} _character_;
if _N_>1 then do;
do i = 1 to dim(myVars);
        myVars[i]=compress(myVars[i]!!_n_-1);
    end;
end;
drop i j;
run;
proc print data = want; run;

输出:

var1  var2  var3 
VarA  VarB  VarC 
VarA1 VarB1 VarC1 
VarA2 VarB2 VarC2 
VarA3 VarB3 VarC3 
VarA4 VarB4 VarC4