SAS 如何找出变量中的最小值，变量的下标是变化的

是 否 +2 论坛币

k人 参与回答

经管之家送您一份

应届毕业生专属福利!

求职就业群

赵安豆老师微信：zhaoandou666

经管之家联合CDA

送您一个全额奖学金名额~ !

立即领取

感谢您参与论坛问题回答

经管之家送您两个论坛币！

+2 论坛币

data B;
set A;
format pfprc best7.4;
array d(855) d_1--d_855;
pfprc=min(of d(dayno)-d(dayno+89));
run;

我把变量存在了数组d(j)中，每个观测的dayno都是不同的，想请问如何找出一行中最小的变量？min(of d_1-d_855)是可以的，但是如何采用数组来表示这个下标，因为每个观测要查找的范围都是不同的。。
请求高人解答！

扫码加我 拉你入群

请注明：姓名-公司-职位

以便审核进群资格，未注明则拒绝

分享0 收藏2 回帖

关键词：最小值 format array FORMA 高人解答 如何

不知理解得对不对：
data test;
  input x1 x2 x3 x4;
  datalines;
1 2 43 5
34 3 5 3
1 4 6 6
3322 0 0 4
;
run;
data need;
  set test;
  array _x _numeric_;
  do i=1 to dim(_x);
    if _x(i)=min(of x:) then do;
   min_x=_x(i);
      min_x_var=vname(_x(i));
end;
  end;
  drop i;
run;
如果最小值有两个以上，变量名只能输出最后一个。

I don't think dynamic arrays are supported in min/max funciton.

1. data B;
   
2. set A;
   
3. format pfprc best7.4;
   
4. array d(855) d_1--d_855;
   
5. array _d[855];
   
6. *set _d[*]=.;
   
7. call pokelong(repeat(put(., rb8., dim(_d)-1), addrlong(_d[1]), 8*dim(_d));
   
8. *set _d[dayno]=d[dayno], ..., _d[dayno+89]=d[dayno+89];
   
9. call pokelong(peekclong(addrlong(d[dayno]), 8*90), addrlong(_d[dayno]), 8*90);
   
10. pfprc=min(of _d[*]);
    
11. run;

复制代码

1. data test;
   
2. input x1 x2 x3 x4 _from _to;
   
3. /*_from和_to代表查找范围*/
   
4. cards;;
   
5. 1 2 3 2 1 4
   
6. 2 3 5 3 2 4
   
7. 2 4 4 2 3 4
   
8. ;
   
9. run;
   
10. 
    
11. data want;
    
12.         set test;
    
13.         length varname  $ 50;
    
14.         array temp(4) x1-x4;
    
15.         do i=_from to _to;
    
16.                 temp_min=temp(_from);
    
17.                 if temp(i)<=temp_min then temp_min=temp(i);/*temp_min为最小值*/
    
18.                 if temp_min=temp(i) then varname=catx("",varname,vname(temp(i)));/*varname为变量的名称*/
    
19.         end;
    
20.         drop i;
    
21. run;
    
22.          

复制代码