3

我正在编写一个宏，它将运行 PROC MIXED，使用 PARMS 语句将 1 级残差方差固定为接近零的值。我正在尝试使用 SAS/IML 为 PARMS 语句生成大部分起始值，例如：

%macro test (dataset= , classroom= , preds= , outcome=);
proc iml;

/*count number of variables*/
    %let nvars = 0; 
    %do %while(%qscan(&preds,&nvars+1,%str( )) ne %str());
        %let nvars = %eval(&nvars+1);
    %end; 

/*determine location of level-1 residual in the start value vector*/
    %let error_location = %eval(((&nvars*(&nvars-1))/2)+&nvars+1);

/*create vector of start values from lower triangle of identity matrix*/
    start_vector = symsqr(I(&nvars));
    %let starts = %str(start_vector[label=""]); 

/*analyze data*/
    proc mixed data=&dataset noprofile method=ml;
        class &classroom;
        model &outcome = &preds /noint;
        random &preds /type=un sub=&classroom g; 
        parms 
            &starts
            .00000001 /hold= &error_location;
    run;
quit;
%mend;

如果没有 PROC MIXED 代码中的 PARMS 语句，该代码可以正常工作。然而，当我按原样运行代码时，SAS 显然将文字字符串 'start_vector[label=""]' 放在 PARMS 之后，而不是列出 IML 生成的值。

如何避免此错误并让 SAS 将 START_VECTOR 中包含的值指定为 PARMS 语句的起始值？

4

2 回答 2

1

“将值从 PROC IML 传递到 SAS 过程”一文中讨论了您的问题和两个解决方案。

您必须将其包装在宏中吗？如果是这样，则 SUBMIT 和 ENDSUBMIT 语句将不起作用，因为它们不能从宏中调用。但是，由于 SAS/IML 使您能够定义和调用带参数的模块，因此我通常会避免使用宏语言并定义一个带参数的模块，然后直接调用该模块。

于 2014-07-31T09:54:47.013 回答
1

您应该使用 SAS/IML 中的SYMPUTorSYMPUTX例程将向量转换为宏变量。

这是将向量放入宏变量中的单个字符串的一种方法。

proc iml;
  start = {"Hi","Bye"};
  call symput("start",rowcat(start`));
  %put &start;
quit;

使用数字向量，您需要使用char它来转换它：

程序 iml; start_vector = j(5); 调用 symputx("start_vector",rowcat(char(j))); %put &start_vector; 退出;

使用数字矩阵，您需要使用SHAPE它来展平它：

proc iml; 
    start_vector = j(5,5); 
    call symputx("start_vector",rowcat(shape(char(start_vector),1))); 
    %put &start_vector;
quit;
于 2014-07-30T18:31:40.407 回答