|
1.介绍
双层优化问题(Bilevel Programming Problems)，也被称为双层规划，最早由Stackelberg与1934年在经济学相关研究中提出，因此也被称为Stackelberg问题。
双层规划问题一般具有层次性、独立性、冲突性、优先性和自主性等特点：
1）层次性
优化时是分层管理的形式，下层优化服从上层优化，但下层优化有相对的自主权。
2）独立性
各层决策者各自控制一部分决策变量，以优化各自的目标。
3）冲突性
各层决策者有目标函数各不相同，且这些目标往往是相互矛盾的。
4）优先性
上层决策者优先做出决策，下层决策者在选择策略时，不能改变上层的决策。 5）自主性
上层的决策可能影响下层的行为，因而部分地影响下层目标的实现，但上层不能完全控制下层的选择行为，在上层决策允许范围内,下层有自主决策权。 按照上下层优化的形式不同又可以分为线性双层优化以及非线性双层优化问题。当双层优化问题中所有目标函数和约束条件均为线性时，即为线性双层优化，否则就是非线性双层优化问题。其中双层优化的基本形式可描述为：
其中，x和y是上层优化的决策变量，但x在下层优化中是参数。所以，双层优化模型是一个优化问题受制于另一个优化问题的模型。
2.问题分析
下面是一个简单的线性双层优化问题：
上下层优化的目标函数和约束条件均为线性，该问题为线性双层优化问题，
为说明原理，按照上下层优化迭代的方式进行求解。
1）第一次迭代
首先不考虑下层优化的决策，上层优化求出最优解为 x1*=6
，
y1=8
，上层最优目标函数为-22
，将
x1*=6
带入下层优化中，求出
y1*=12
，下层最优目标函数为-12
。
2）第二次迭代
将 y1*=12
带入上层优化中，此时上层优化的两个约束条件互相冲突，上层优化无最优解。 迭代无法收敛，是否意味着这个双层优化问题无解？很明显不是的，实际上这个问题存在最优解 x=8
，
y=6
，上层优化最优目标函数值为
-20
。
matlab代码：
%% 清空
clc
clear
close all
warning off
%% 采用迭代方法进行求解
x=sdpvar(1);
y=sdpvar(1);
Constraints1=[2*x-3*y >= -12 , x+y =0 , y>=0];
objective1=-x-2*y;
objective2=-y;
ops=sdpsettings('verbose', 0 , 'solver', 'cplex');
result=optimize(Constraints1,objective1,ops);
if result.problem==0
disp(['第一次迭代最优解：x=',num2str(value(x)),',y=',num2str(value(y))])
disp(['第一次迭代最优函数值=',num2str(value(objective1))])
end
x_dot=zeros(1,100);
y_dot=zeros(1,100);
x_dot(1)=value(x);
for k=1:10
Constraints2=[-3*x+y =0];
result=optimize(Constraints2,objective2,ops);
y_dot(k)=value(y);
Constraints1=[2*x-3*y >= -12 , x+y =0 , y>=0];
result1=optimize(Constraints1,objective1,ops);
x_dot(k+1)=value(x);
if result1.problem || result.problem
disp('迭代无法收敛')
break
end
end
运行结果：
3.双层优化求解方法
上面的问题是一个小规模线性双层优化问题，通过迭代也无法求出问题的解，实际我们要解决的问题一般都不会这么简单，通常规模比较大，或者模型中存在非线性，一般来说很难通过简单的迭代法进行求解，需要考虑其他方法。实际上，双层优化问题是一个 NP 难问题，通常采用的方式是利用
KKT(Karush-Kuhn-Tucker)
条件将双层优化转换为单层优化问题。假设一个优化问题是如下的形式：
定义拉格朗日函数为：
其中，λ
j
是
g
j(
x
)
=
0
对应的拉格朗日乘数，
uk是hk(x)= -12 , x+y =0 , y>=0 , -3*x+y = -12 , x+y =0 , y>=0 , -3*x+y == -3 , 3*x+y == 30 ,];
objective=-x-2*y;
ops=sdpsettings('verbose', 0 , 'solver', 'cplex');
result2=optimize(Constraints1,objective,ops);
disp('****u1∈(0,1)∪(1,+∞)时的最优解和最优函数值*****')
if result2.problem==0
disp(['最优解：x=',num2str(value(x)),',y=',num2str(value(y))])
disp(['最优函数值=',num2str(value(objective))])
else
disp('无最优解')
end
%% u1=1
x=sdpvar(1);
y=sdpvar(1);
Constraints1=[2*x-3*y >= -12 , x+y =0 , y>=0 , -3*x+y == -3 , 3*x+y |