【优化算法】多目标跟踪优化算法（MTOA）【含Matlab源码 1466期】

原创

佛怒火莲 2021-11-08 14:19:28 ©著作权

文章标签 目标跟踪 matlab 算法优化算法参考文献 文章分类 数据结构与算法人工智能

©著作权归作者所有：来自51CTO博客作者佛怒火莲的原创作品，请联系作者获取转载授权，否则将追究法律责任

二、部分源代码

%============================================================================%
%               Multi-tracker Optimization Algorithm (MTOA)                  % 
%                             version 1.0                                    %
%                       -----------------------                              %
%                    Developed in MATLAB R2017b (v9.3)                       %
%                                  %
%============================================================================%

clear
clc
close all
format long

%=======================Initializing MTOA Parameters=====================
Fcn_Name='TestFcn'; % Optimization Problrm Function
%=== Rastrigin Function (Function number 11 in the MTOA paper (Table. 2)) <----(Normalized Input)
%
%    x=xn*2-1;
%    u=(x(1)^2+x(2)^2-cos(18*x(1))-cos(18*x(2)));
%  
%    Min Cost = -2 @ xn=(0.5 , 0.5)

Min=zeros(1,2).'; 
Max=ones(1,2).'; 
Par_Interval=[Min Max]; %  Search Space Limitation 
No_GTs=20; %  Number of Global Tracker 
No_LTs=4; %  Number of Local Tracker
%---------- Equivalent Population = 100

RM=sqrt(2); % Maximum Search Radius
Rm=1e-4; % Minimum Search Radius
Max_Itr=100; % Maximum Iteration
Beta=.95; % Beta
Lambda=2; % Lambda
Theta=pi/8; % Theta

%==============================Graphic Option============================
TwoDGraphic_on=0; % (0  or  1) % If this option is enabled (TwoDGraphic_on=1) the Local and Global search process will be displayed.

%============================MTOA Function Run===========================
[GOP_Cost,GOP]=MTOA(Fcn_Name,Par_Interval,No_GTs,No_LTs,RM,Rm,Max_Itr,Beta,Lambda,Theta,TwoDGraphic_on);

%=========   ==================Solution==================================
disp('Solution=')
disp(GOP);
%============================================================================%
%               Multi-tracker Optimization Algorithm (MTOA)                  % 
%                             version 1.0                                    %
%                    %
%============================================================================%
function Out = Ev_Fcn(Points,Fcn_Name)

[m,n]=size(Points);

for i=1:n
o(1,i)=feval(Fcn_Name,Points(:,i));
end

Out=o;

end