Rev | Line | |
---|
[37] | 1 | function fail = regress_bmibnb_gamsrobot(ops) |
---|
| 2 | |
---|
| 3 | x = sdpvar(10,1); |
---|
| 4 | t = sdpvar(1,1); |
---|
| 5 | x(1) = 1-sum(x(2:end)); |
---|
| 6 | obj = 0; |
---|
| 7 | for i = 1:9 |
---|
| 8 | obj = obj+x(i)*x(i+1); |
---|
| 9 | end |
---|
| 10 | for i = 1:8 |
---|
| 11 | obj = obj+x(i)*x(i+2); |
---|
| 12 | end |
---|
| 13 | obj = obj + x(1)*x(7)+ x(1)*x(9)+ x(2)*x(10)+ x(4)*x(7); |
---|
| 14 | F = set(1>x>0); |
---|
| 15 | F = F + set(-obj<t); |
---|
| 16 | obj = t; |
---|
| 17 | |
---|
| 18 | sol = solvesdp(F,obj,ops); |
---|
| 19 | |
---|
| 20 | fail=getfail(sol.problem,double(obj),-0.375,checkset(F)); |
---|
| 21 | |
---|
| 22 | function fail = getfail(problem,obj,objgoal,infeas) |
---|
| 23 | fail = 0; |
---|
| 24 | if problem == 0 |
---|
| 25 | if abs(obj-objgoal)>1e-3 |
---|
| 26 | fail = 1; |
---|
| 27 | elseif max(infeas)<-1e-6 |
---|
| 28 | fail = 2; |
---|
| 29 | end |
---|
| 30 | else |
---|
| 31 | fail = 3; |
---|
| 32 | end |
---|
| 33 | |
---|
Note: See
TracBrowser
for help on using the repository browser.