Documentation of mobjkita

Global Index (all files) (short | long) | Local contents | Local Index (files in subdir) (short | long)

Function Synopsis

ObjVal = mobjkita(Chrom);

Help text

 MultiObjective Function: KITA's function (constrained)

 Kita, Hajime, et al. "Multi-Objective Optimization by Means of
 the Thermodynamical Genetic Algorithm." in Voigt et al. (ed.), 
 Parallel Problem Solving from Nature - PPSN IV, pp. 504-512, 1996.

 Pareto Properties:
 Ptrue disconnected, PFtrue disconnected and concave

 Syntax:  ObjV = mobjkita(Chrom)

 For Input and Output parameters see objfun1.

 See also: objfun1, mobjfonseca1

Cross-Reference Information

Listing of function mobjkita

% Author:   Hartmut Pohlheim
% History:  11.05.2001  file created
%           04.07.2001  constraints included
%           20.09.2001  update to V3.4
%           08.05.2005  formatting changed


function ObjVal = mobjkita(Chrom);

   NAIN = nargin; NAOUT = nargout;

   if NAIN < 1, Chrom = []; end
   if isnan(Chrom), Chrom = []; end
   if isempty(Chrom), Chrom = [NaN, NaN, 1]; end
   
   % create structure
   if isnan(Chrom(1)),
       if all([isnan(Chrom(2)), Chrom(3) <= 10]),
           ObjVal = objfunoptset(...
               'FunctionName', 'KITAs MO-Function', ...
               'VarBoundMin', 0, 'VarBoundMax',   7, ...
               'NumVarDefault', 2, 'NumVarMin', 2, 'NumVarMax', 2, ...
               'NumObjDefault', 3, 'NumObjMin', 3, 'NumObjMax', 3);
       end
   else
      % F(x,y)  = f1(x,y), f2(x,y),
      % f1(x,y) = x^2 - y,
      % f2(x,y) = -0.5*x - y - 1,
      % subject to
      % 0 >= 1/6 * x + y - 13/2,
      % 0 >= 1/2 * x + y - 15/2,
      % 0 >=   5 * x + y - 30

      ObjVal = [Chrom(:, 1).^2 - Chrom(:, 2), ...
              -0.5.*Chrom(:, 1) - Chrom(:, 2) - 1, ...
              ~all([0 >= (1/6) .* Chrom(:, 1) + Chrom(:, 2) - 13/2, ...
                    0 >= (1/2) .* Chrom(:, 1) + Chrom(:, 2) - 15/2, ...
                    0 >= 5 * Chrom(:, 1) + Chrom(:, 2) - 30], 2)];
   end


% End of function