资源

使用密集格式(lsoe01)

/**********************************************************************//*                                                                    *//*S A S S A M P L E L I B R A R Y*//*                                                                    *//*名称:lsoe01*//*标题:使用密集格式(lsoe01)*//*产品:或*//*系统:所有*//*关键字:或*//*程序:OPTLSO、FCMP、PRINT*//*数据:*//*                                                                    *//*支持:更新:*//*参考:*//*MISC:OPTLSO章节中的示例1*//*本地搜索优化书籍*//*                                                                    *//**********************************************************************/数据变量数据;输入_ id$_ lb_ ub_;数据线;x1 0 1个x2 0 1个x3 0 1个x4 0 1x5 0 1x6 0 1x7 0 1x8 0 1x9 0 1x10 0 100x11 0 100个x12 0 100x13 0 1;proc fcmp outlib=sasuser.myfuncs.mypkg;功能quadobj(x1、x2、x3、x4、x5、x6、x7、x8、x9、x10、x11、x12、x13);总和1=5*(x1+x2+x3+x4);总和2=5*(x1**2+x2**2+x3**2+x4**2);总和3=(x5+x6+x7+x8+x9+x10+x11+x12+x13);返回(sum1-sum2-sum3);endsub;运行;数据对象;输入_ id _$函数_$传感器_$;数据线;f quadobj最小值;数据lindata;输入_ id _$_ lb_ x1-x13 _ ub_;数据线;a1。2  2  0  0  0  0  0  0  0 1 1 0 0 10答2。2  0  2  0  0  0  0  0  0 1 0 1 0 10a3。2  0  2  0  0  0  0  0  0 0 1 1 0 10a4-8  0  0  0  0  0  0  0  0 1 0 0 0  0a5。0 -8  0  0  0  0  0  0  0 0 1 0 0  0a6。0  0 -8  0  0  0  0  0  0 0 0 1 0  0a7。0  0  0 -2 -1  0  0  0  0 1 0 0 0  0a8。0  0  0  0  0 -2 -1  0  0 0 1 0 0  0a9。0  0  0  0  0  0  0 -2 -1 0 0 1 0  0;选项cmplib=sauser.myfuncs;程序optlsoprimalout=溶液目标=objdata变量=vardatalincon=lindata;性能nthreads=2;运行;proc打印数据=解决方案;运行;