**Author details**

238 Performance Evaluation of Bearings

%xub(1,2)=480\*10^-6; %xub(1,2)=1\*10^-3;

xub(1,4)=0.095; xub(1,5)=2;

%xub(1,1)=10000;

%xub(1,3)=3.5\*10^5; %xub(1,3)=1\*10^-7;

popsize= popsize + 1;

% x- variables, matrix

% Revision 0.9 2003/4/17

% popsize- population size

if(rem(popsize, 2) ~= 0) % do not move

% npara- number of the variables

% Edit by Hwanghun Jeong, CME PKNU

L\_m=(1/8\*pi\*90+1/8\*pi\*40+2\*60)\*10^-3;

% objfunc- objective function value, vector

% The EVALOBJ6 function evaluates a multivariable function

% Copyright (c) 2000 by Prof. Gang-Gyoo Jin, Korea Maritime

function objfunc= EvalObj22(x,npara,popsize,Test\_data);

%xub(1,2)=10;

% EvalObj22.m

% Input:

% Output:

University

Rd=273000;

Rf=20000; R=9;

Gs=1000; Kd=0.005; Kp=1; Ki=2; 

N=200;

X=0.0006;

Ri=10000\*1.0045;

A = 10^(107.7/20);

Cf= 4.94\*10^-9;

mu\_o=4\*pi\*10^-7;

S\_a= 480\*10^-6 \*0.5;

end

%

%

%

Hwang Hun Jeong, So Nam Yun and Joo Ho Yang *Korea Institute of Machinery and Materials, Daejeon, Republic of Korea* 

Joo Ho Yang *PuKyong National University, Pusan, Republic of Korea* 
