【智能优化算法-算术三角优化算法】基于混合算术三角优化算法 (ATOA)求解单目标优化问题附matlab代码.zip

clear all;close all;clc figure() subplot(3,6,1) [LB,UB,Dim,F_obj]=Get_F('F1'); func_plot('F1'); title('(F1)');xlabel('x_1');ylabel('x_2');zlabel('F_1(x_1,x_2)'); subplot(3,6,2) [LB,UB,Dim,F_obj]=Get_F('F2'); func_plot('F2'); title('(F2)');xlabel('x_1');ylabel('x_2');zlabel('F_2(x_1,x_2)'); subplot(3,6,3) [LB,UB,Dim,F_obj]=Get_F('F3'); func_plot('F3'); title('(F3)');xlabel('x_1');ylabel('x_2');zlabel('F_3(x_1,x_2)'); subplot(3,6,4) [LB,UB,Dim,F_obj]=Get_F('F5'); func_plot('F5'); title('(F4)');xlabel('x_1');ylabel('x_2');zlabel('F_4(x_1,x_2)'); subplot(3,6,5) [LB,UB,Dim,F_obj]=Get_F('F6'); func_plot('F6'); title('(F5)');xlabel('x_1');ylabel('x_2');zlabel('F_5(x_1,x_2)'); subplot(3,6,6) [LB,UB,Dim,F_obj]=Get_F('F7'); func_plot('F7'); title('(F6)');xlabel('x_1');ylabel('x_2');zlabel('F_6(x_1,x_2)'); subplot(3,6,7) [LB,UB,Dim,F_obj]=Get_F('F8'); func_plot('F8'); title('(F7)');xlabel('x_1');ylabel('x_2');zlabel('F_7(x_1,x_2)'); subplot(3,6,8) [LB,UB,Dim,F_obj]=Get_F('F10'); func_plot('F10'); title('(F8)');xlabel('x_1');ylabel('x_2');zlabel('F_8(x_1,x_2)'); subplot(3,6,9) [LB,UB,Dim,F_obj]=Get_F('F12'); func_plot('F12'); title('(F9)');xlabel('x_1');ylabel('x_2');zlabel('F_9(x_1,x_2)'); subplot(3,6,10) [LB,UB,Dim,F_obj]=Get_F('F13'); func_plot('F13'); title('(F10)');xlabel('x_1');ylabel('x_2');zlabel('F_{10}(x_1,x_2)'); subplot(3,6,11) [LB,UB,Dim,F_obj]=Get_F('F14'); func_plot('F14'); title('(F11)');xlabel('x_1');ylabel('x_2');zlabel('F_{11}(x_1,x_2)'); subplot(3,6,12) [LB,UB,Dim,F_obj]=Get_F('F15'); func_plot('F15'); title('(F12)');xlabel('x_1');ylabel('x_2');zlabel('F_{12}(x_1,x_2)'); subplot(3,6,13) [LB,UB,Dim,F_obj]=Get_F('F16'); func_plot('F16'); title('(F13)');xlabel('x_1');ylabel('x_2');zlabel('F_{13}(x_1,x_2)'); subplot(3,6,14) [LB,UB,Dim,F_obj]=Get_F('F17'); func_plot('F17'); title('(F14)');xlabel('x_1');ylabel('x_2');zlabel('F_{14}(x_1,x_2)'); subplot(3,6,15) [LB,UB,Dim,F_obj]=Get_F('F18'); func_plot('F18'); title('(F15)');xlabel('x_1');ylabel('x_2');zlabel('F_{15}(x_1,x_2)'); subplot(3,6,16) [LB,UB,Dim,F_obj]=Get_F('F19'); func_plot('F19'); title('(F16)');xlabel('x_1');ylabel('x_2');zlabel('F_{16}(x_1,x_2)'); subplot(3,6,17) [LB,UB,Dim,F_obj]=Get_F('F20'); func_plot('F20'); title('(F17)');xlabel('x_1');ylabel('x_2');zlabel('F_{17}(x_1,x_2)'); subplot(3,6,18) [LB,UB,Dim,F_obj]=Get_F('F21'); func_plot('F21'); title('(F18)');xlabel('x_1');ylabel('x_2');zlabel('F_{18}(x_1,x_2)'); figure() subplot(3,6,1) F_obj=@egg; x = -512:2:512; y = -512:2:512; [x_new , y_new] = meshgrid(x,y); for k1 = 1: size(x_new, 1) for k2 = 1 : size(x_new , 2) X = [ x_new(k1,k2) , y_new(k1, k2) ]; z(k1,k2) = F_obj( X ); end end C = x_new.*y_new; surfc(x_new , y_new , z,'LineStyle','none'); title('(F19)');xlabel('x_1');ylabel('x_2');zlabel('F_{19}(x_1,x_2)'); %% %%%Till this above, all plot is coming na%%% %% clear; clc; subplot(3,6,2) F_obj=@holder; x = -10:0.1:10; y = -10:0.1:10; [x_new , y_new] = meshgrid(x,y); for k1 = 1: size(x_new, 1) for k2 = 1 : size(x_new , 2) X = [ x_new(k1,k2) , y_new(k1, k2) ]; z(k1,k2) = F_obj( X ); end end C = x_new.*y_new; surfc(x_new , y_new , z,'LineStyle','none'); title('(F20)');xlabel('x_1');ylabel('x_2');zlabel('F_{20}(x_1,x_2)'); clear; clc; subplot(3,6,3) F_obj=@shubert; x = -10:0.1:10; y = -10:0.1:10; [x_new , y_new] = meshgrid(x,y); for k1 = 1: size(x_new, 1) for k2 = 1 : size(x_new , 2) X = [ x_new(k1,k2) , y_new(k1, k2) ]; z(k1,k2) = F_obj( X ); end end C = x_new.*y_new; surfc(x_new , y_new , z,'LineStyle','none'); title('(F21)');xlabel('x_1');ylabel('x_2');zlabel('F_{21}(x_1,x_2)'); clear; clc; subplot(3,6,4) F_obj=@mccorm; x = -1.5:0.1:4; y = -1.5:0.1:4; [x_new , y_new] = meshgrid(x,y); for k1 = 1: size(x_new, 1) for k2 = 1 : size(x_new , 2) X = [ x_new(k1,k2) , y_new(k1, k2) ]; z(k1,k2) = F_obj( X ); end end C = x_new.*y_new; surfc(x_new , y_new , z,'LineStyle','none'); title('(F22)');xlabel('x_1');ylabel('x_2');zlabel('F_{22}(x_1,x_2)'); clear; clc; subplot(3,6,5) F_obj=@camel; x = -3:0.1:3; y = -3:0.1:3; [x_new , y_new] = meshgrid(x,y); for k1 = 1: size(x_new, 1) for k2 = 1 : size(x_new , 2) X = [ x_new(k1,k2) , y_new(k1, k2) ]; z(k1,k2) = F_obj( X ); end end C = x_new.*y_new; surfc(x_new , y_new , z,'LineStyle','none'); title('(F23)');xlabel('x_1');ylabel('x_2');zlabel('F_{23}(x_1,x_2)'); clear; clc; subplot(3,6,6) F_obj=@easom; x = -3:0.1:3; y = -3:0.1:3; [x_new , y_new] = meshgrid(x,y); for k1 = 1: size(x_new, 1) for k2 = 1 : size(x_new , 2) X = [ x_new(k1,k2) , y_new(k1, k2) ]; z(k1,k2) = F_obj( X ); end end C = x_new.*y_new; surfc(x_new , y_new , z,'LineStyle','none'); title('(F24)');xlabel('x_1');ylabel('x_2');zlabel('F_{24}(x_1,x_2)'); clear; clc; subplot(3,6,7) F_obj=@branin; x = -5:0.1:10; y = -5:0.1:10; [x_new , y_new] = meshgrid(x,y); for k1 = 1: size(x_new, 1) for k2 = 1 : size(x_new , 2) X = [ x_new(k1,k2) , y_new(k1, k2) ]; z(k1,k2) = F_obj( X ); end end C = x_new.*y_new; surfc(x_new , y_new , z,'LineStyle','none'); title('(F25)');xlabel('x_1');ylabel('x_2');zlabel('F_{25}(x_1,x_2)'); clear; clc; subplot(3,6,8) F_obj=@goldpr; x = -2:0.1:2; y = -2:0.1:2; [x_new , y_new] = meshgrid(x,y); for k1 = 1: size(x_new, 1) for k2 = 1 : size(x_new , 2) X = [ x_new(k1,k2) , y_new(k1, k2) ]; z(k1,k2) = F_obj( X ); end end C = x_new.*y_new; surfc(x_new , y_new , z,'LineStyle','none'); title('(F26)');xlabel('x_1');ylabel('x_2');zlabel('F_{26}(x_1,x_2)'); clear; clc; subplot(3,6,9) F_obj=@stybtang; x = -5:0.1:5; y = -5:0.1:5; [x_new , y_new] = meshgrid(x,y); for k1 = 1: size(x_new, 1) for k2 = 1 : size(x_new , 2) X = [ x_new(k1,k2) , y_new(k1, k2) ]; z(k1,k2) = F_obj( X ); end end C = x_new.*y_new; surfc(x_new , y_new , z,'LineStyle','none'); title('(F27)');xlabel('x_1');ylabel('x_2');zlabel('F_{27}(x_1,x_2)'); clear; clc; subplot(3,6,10) F_obj=@levy; x=-50:0.1:50; y=-50:0.1:50; [x_new , y_new] = meshgrid(x,y); for k1 = 1: size(x_new, 1) for k2 = 1 : size(x_new , 2) X = [ x_new(k1,k2) , y_new(k1, k2) ]; z(k1,k2) = F_obj( X ); end end %C = x_new.*y_new; surfc(x_new , y_new , z,'LineStyle','none'); title('(F28)');xlabel('x_1');ylabel('x_2');zlabel('F_{28}(x_1,x_2)'); clear; clc; subplot(3,6,11) F_obj=@colville; x = -10:0.1:10; y = -10:0.1:10; [x_new , y_new] = meshgrid(x,y); for k1 = 1: size(x_new, 1) for k2 = 1 : size(x_new , 2) X = [ x_new(k1,k2) , y_new(k1, k2) , x_new(k1,k2) , y_new(k1, k2) ]; z(k1,k2) = F_obj( X ); end end C = x_new.*y_new; surfc(x_new , y_new , z,'LineStyle','none'); title('(F29)');xlabel('x_1');ylabel('x_2');zlabel('F_{29}(x_1,x_2)'); clear; clc; subplot(3,6,12) F_obj=@hart3D; x = 0:0.1:1; y = 0:0.1:1; [x_new , y_new] = meshgrid(x,y); for k1 = 1: size(x_new, 1) for k2 = 1 : size(x_new , 2) X = [ x_new(k1,k2) , y_new(k1, k2) , x_new(k1,k2)]; z(k1,k2) = F_obj( X ); end end C = x_new.*y_new; surfc(x_new , y_new , z,'LineStyle','none'); title('(F30)');xlabel('x_1');ylabel('x_2');zlabel('F_{30}(x_1,x_2)'); clear; clc; subplot(3,6,13) F_obj=@shekel; x = 0:0.1:10; y = 0:0.1:10; [x_new , y_new] = meshgrid(x,y); for k1 = 1: size(x_new, 1) for k2 = 1 : size(x_new , 2) X = [ x_new(k1,k2) , y_new(k1, k2) , x_new(k1,k2), y_new(k1,k2)]; z(k1,k2) = F_obj( X ); end end C = x_new.*y_new; surfc(x_new , y_new , z,'LineStyle','none'); title('(F31)');xlabel('x_1');ylabel('x_2');zlabel('F_{31}(x_1,x_2)'); clear; clc; subplot(3,6,14) F_obj=@hart6D; x = 0:0.1:1; y = 0:0.1:1; [x_new , y_new] = meshgrid(x,y); fo