仅作自己学习使用
一、问题
需求: 计算函数
的极小值,其中个体x的维数n=10,即x=(x1,x2,…,x10),其中每一个分量xi均需在[-20,20]内。因此可以知道,这个函数只有一个极小值点x = (0,0,…,0),且其极小值是0,那么我们用模拟退火来实现一下:
二、matlab代码实现
clear
clcT1 = cputime;D = 10; % 变量维数
Xs = 20; % 上限
Xx = -20; % 下限
L = 20; % 马尔可夫链长度
K = 0.98; % 降温系数
S = 0.01; % 步长因子
T = 100; % 初始温度
YZ = 1e-8; % 容差
P = 0; % MetroPolis过程中总接受点(MetroPolis是接受准则,小于接受,大于是概率接受)
PreX = rand(D,1)*(Xs-Xx) + Xx; % 设置初值位置(这个随机数可以产生一个-20到20的随机数)
PreBestX = PreX; % 上一个最优解
PreX = rand(D,1)*(Xs-Xx) + Xx; % 虽然代码相同,但是因为随机数种子,产生的值会不同
BestX = PreX; % 最优解
trace = eval(BestX); % 记录初始值
deta = abs(eval(BestX) - eval(PreBestX));while (deta>YZ) && (T>0.0001)%% 本次退火结束,降温T = K * T;%% 在当前温度T下的迭代次数为Lfor i = 1 : L% 在此点附近随机选择下一个点NextX = PreX + S*(rand(D,1)*(Xs-Xx) + Xx);% 如果这个点其中有个分量超出了定义域,则重新分配一个值for j = 1:Dif(NextX(j) > Xs || NextX(j)<Xx)NextX(j) = PreX(j) + S*(rand*(Xs-Xx) + Xx);j = j-1; % 因为重新分配的值任然可能超出边界,所以退回到当前的那个j,再次检查是否超出边界end end%% 判断是否是全局最优解if( eval(NextX) < eval(BestX) )PreBestX = BestX; % 保留上一个最优解BestX = NextX; % 更新上一个最优解end%% MetroPolis接受准则if( eval(NextX) < eval(PreX) )% 当前解更优秀,接受新解PreX = NextX;P = P + 1;else% 当前解更差,概率接受P1 = exp((eval(PreX)-eval(NextX))/T); % 注意指数部分是个复数,所以要自己调整减的顺序if (P1 > rand)PreX = NextX;P = P + 1;end endtrace = [trace eval(BestX)];enddeta = abs(eval(BestX)-eval(PreBestX));endT2 = cputime;
% 运行代码所需要的CPU时间
timeConsume = T2 - T1;disp('最小值点在:');
BestX
disp('最小值为');
eval(BestX)
figure(color=[1 1 1])
plot(trace(2:end),Color=[0.502, 0.000, 0.502],LineWidth=2);
xlabel("迭代次数")
ylabel("目标函数值")
title("适应度曲线","CPU时间消耗: "+timeConsume + 's');function result = eval(x)%% 评估函数result = sum(x.^2);
end
三、效果图
可以看到,最后是达到0.0269403,还不是真正意义上的极小值,但是模拟退火算法也算是一个比较有效的全局搜索算法了。