楼主: bobguy
1348 0

[学习分享] inverse a square matrix in data step [推广有奖]

学科带头人

7%

还不是VIP/贵宾

-

威望
0
论坛币
14187 个
通用积分
28.9279
学术水平
344 点
热心指数
363 点
信用等级
228 点
经验
104882 点
帖子
1846
精华
0
在线时间
1608 小时
注册时间
2008-7-18
最后登录
2019-3-8

中级热心勋章

+2 论坛币
k人 参与回答

经管之家送您一份

应届毕业生专属福利!

求职就业群
赵安豆老师微信:zhaoandou666

经管之家联合CDA

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

感谢您参与论坛问题回答

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

+2 论坛币
Several call routine in SAS/IML are now can be defined in FCMP and used in data step and other proccedures. Here is an example for inverse a matrix(array) in data step.

proc fcmp outlib=sasuser.funcs.temp;;
     subroutine invert (mat[*,*],invmat[*,*] );
      outargs invmat;
      call inv(mat, invmat);
      endsub;
run;
quit;

options cmplib=sasuser.funcs;

data _null_;
  array a(3,3) _temporary_   ( 1 2 3,
                               2 2 4,
                               3 4 5
                             );
  array b(3,3) _temporary_ ;
  call invert (a, b);

  do i=1 to dim1(b);
    do j=1 to dim2(b);
      put b[i,j] @;
    end;
    put;
  end;
run;

***check with iml;
proc iml;
a={ 1 2 3,
     2 2 4,
     3 4 5
    };
b=inv(a);
print b;
quit;



二维码

扫码加我 拉你入群

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

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

关键词:Data step inverse Square matrix Data mat null

您需要登录后才可以回帖 登录 | 我要注册

本版微信群
加好友,备注cda
拉您进交流群

京ICP备16021002-2号 京B2-20170662号 京公网安备 11010802022788号 论坛法律顾问:王进律师 知识产权保护声明   免责及隐私声明

GMT+8, 2024-5-15 02:41