资源

约翰逊分配制度(lsoe08)

/**********************************************************************//*                                                                    *//*S A S S A M P L E L I B R A R Y*//**//*姓名:lsoe08*//*标题:约翰逊分配制度(同08)*//*产品:或*//*系统:所有*//*关键字:或*//*项目:OPTLSO、FCMP*//*数据:*//*                                                                    *//*支持:更新:*//*参考:*//*MISC:OPTLSO章节中的示例8*//*本地搜索优化书籍*//*                                                                    *//**********************************************************************/数据sudata;n=20000;θ=-1;σ=1;δ=3;γ=5;rngSeed=123;do i=1到n;z=雷诺(rngSeed);a=经验((z-伽马)/增量);d=西格玛*((a**2-1)/(2*a))+θ;产出;结束;保留d;运行;proc fcmp outlib=sasuser.myfuncs.mypkg;函数jsu(x4、x2、f1);返回(20000*(log(x4)-log(x2))+f1);endsub;函数jsu1(x1,x2,x3,x4,d);yk=(d-x1)/x2;zk=yk+sqrt(1+yk**2);返回(-0.5*(x3+x4*log(zk))**2-0.5*log;endsub;运行;选项cmplib=sasuser.myfuncs;数据对象数据;输入_ id _$函数_$传感器_$数据集_$;数据线;f1 jsu1。苏丹f jsu最大值。;数据变量数据;输入_ id$_ lb_ ub_;数据线;x1。x2 1e-12。x3。x4 1e-12。;程序optlsoprimalout=溶液目标=objdata变量=vardata对数频率=100最大值=1000;性能节点=4个nthreads=8;运行;