关于proc corr的输出问题

shiyiming

我现在用ods输出。code如下：
[code:1n3p74gj]
ods listing close;
ods output "Pearson Correlations"=corrcoef;
PROC CORR data=raw; VAR var1-var4;         RUN ;
ods output close;
ods listing;

[/code:1n3p74gj]

但是输出为：
variable var1 var2 var3 var4 Pvar1 Pvar2 Pvar3 Pvar4 Nvar1 Nvar2 Nvar3 Nvar4
var1
var2
var3
var4

我想要实现：
variable var1 var2 var3 var4
var1
Pvar1
Nvar1
var2
Pvar2
Nvar2
...
...

我把corrcoef转置了一下，但是怎么排成我想要的顺序呢？

谢谢！

shiyiming

[code:1hacnvas]data transCorrcoef;
                length variable_ $32; set CorrCoef;
                array VarArr(12) var1 -- Nvar4;
                array var(4);
                do i = 1 to 12;
                        j = ifn(mod(i, 4), mod(i, 4), 4);
                        var[j] = VarArr[i];
                        if j = 4 then do;
                                variable_ = ifc(i = 4, variable, ifc(i = 8, 'P'||variable, 'N'||variable)); output;
                        end;
                end;
                keep variable_ var1-var4; rename variable_ = variable;
        run;[/code:1hacnvas]