请选择 进入手机版 | 继续访问电脑版
楼主: X-power
1575 2

[问答] EG 跑回归提示内存不足 [推广有奖]

  • 1关注
  • 0粉丝

大专生

10%

还不是VIP/贵宾

-

威望
0
论坛币
63 个
通用积分
0
学术水平
0 点
热心指数
2 点
信用等级
0 点
经验
385 点
帖子
34
精华
0
在线时间
30 小时
注册时间
2013-8-22
最后登录
2017-9-18

X-power 发表于 2017-9-16 17:41:22 |显示全部楼层 |坛友微信交流群

+2 论坛币
k人 参与回答

经管之家送您一份

应届毕业生专属福利!

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

经管之家联合CDA

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

感谢您参与论坛问题回答

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

+2 论坛币
在SAS EG里跑回归 跑2-6个自变量还正常 但是跑2-8个自变量就提示内存不足了
但是把2-6和7-8分两段跑也提示内存不足
代码如下,请教一下大家如何修改代码才能避免该问题
在SAS EG里不知道怎么调内存memsize

%let para=&para2;
%let num=&num_para2;
%let ecodata=sas66.eco_his_season;

%macro paracorr(name,ecodata,para,num,corr);
proc corr
data=&ecodata
out=work.corr;
var ¶
run;
data work.corr1;
set work.corr;
if _TYPE_ ne 'CORR' then delete;
%do i=1 %to #
         %let p=%scan(&para,&i);
         if &p>&corr and &p<1 then &p=0;
         else &p=1;
%end;
run;
%mend;

%paracorr(M1,sas66.eco_his_season,&para,&num,0.85);

%macro mreg(name,para,num,min_num,max_num);
%local x;
%let x1=%scan(&para,1);
%let x=x1;
%do i=2 %to &num;
         %let x&i=%scan(&para,&i);
         %let x=&x,x&i;
%end;
/*%put x=&x;*/
proc reg data=work.&name outest=work.&name.test;
%do j=&min_num %to &max_num;
         %let ncomb=%sysfunc(comb(&num,&j));
         %do k=1 %to &ncomb;
                 %syscall allcomb(k, j, &x);
                 %let regpara= ;
                 %do m=1 %to &j;
                         %let regpara=%str(&regpara &&x&m);
                 %end;
                 reg1:model logit&name=&regpara
                 ;
                /*
                 %put regpara &j &k: &regpara sysinfo=&sysinfo syserr=&syserr;
                 */         
         %end;
%end;
run;
quit;
%mend mreg;

%macro mreg_33(name,para,num,min_num,max_num);
%local x y;
%let x1=%scan(&para,1);
%let y1=0;
%let x=x1;
%let y=y1;
%let y_num=1;
%do i=2 %to &num;
         %let x&i=%scan(&para,&i);
         %let x=&x,x&i;
%end;
proc reg data=work.&name outest=work.&name.test;
%do j=&min_num %to &max_num;
         %do %while( &y_num<&j);
                 %let y_num=%eval(&y_num+1);
                 /*%put y_num=&y_num j=&j;*/
                 %let y&y_num=0;
                 %let y=&y,y&y_num;
         %end;
         %let ncomb=%sysfunc(comb(&num,&j));
         %let y1=0;
         %do k=1 %to &ncomb;
                 %syscall allcombi(num, j, &y);
                 /*%put y=&y;*/
                 %let regpara= ;
                 %do m=1 %to &j;
                         %let ym=&&y&m;
                         %let regpara=%str(&regpara &&x&ym);
                 %end;
                 reg1:model logit&name=&regpara
                 ;
                 /*%put regpara &j &k: &regpara sysinfo=&sysinfo syserr=&syserr;
                 */         
         %end;
%end;
run;
quit;
%mend mreg_33;



*%mreg_33(lgdcorp,&newpara,&num_newpara,1,5);
%mreg(M1,&para,&num,2,7);
二维码

扫码加我 拉你入群

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

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

关键词:内存不足 memsize delete Eason Macro

已有 1 人评分热心指数 收起 理由
eijuhz + 2 鼓励积极发帖讨论

总评分: 热心指数 + 2   查看全部评分

X-power 发表于 2017-9-17 13:53:34 |显示全部楼层 |坛友微信交流群
upupup

使用道具

X-power 发表于 2017-9-18 00:40:10 |显示全部楼层 |坛友微信交流群
upupup

使用道具

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

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

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

GMT+8, 2024-3-29 04:21