粒子群算法中的罚函数matlab,58-带罚函数的自适应粒子群算法

% 改进的快速粒子群优化算法 (APSO):

function apso

Lb=[0.1 0.1  0.1  0.1]; %下边界

Ub=[2.0 10.0 10.0 2.0]; %上边界

% 默认参数

para=[25 150 0.95]; %[粒子数，迭代次数，gama参数]

% APSO 优化求解函数

[gbest,fmin]=pso_mincon(@cost,@constraint,Lb,Ub,para);

% 输出结果

Bestsolution=gbest % 全局最优个体

fmin

%% 目标函数

function f=cost(x)

f=1.10471*x(1)^2*x(2)+0.04811*x(3)*x(4)*(14.0+x(2));

% 非线性约束

function [g,geq]=constraint(x)

% 不等式限制条件

Q=6000*(14+x(2)/2);

D=sqrt(x(2)^2/4+(x(1)+x(3))^2/4);

J=2*(x(1)*x(2)*sqrt(2)*(x(2)^2/12+(x(1)+x(3))^2/4));

alpha=6000/(sqrt(2)*x(1)*x(2));

beta=Q*D/J;

tau=sqrt(alpha^2+2*alpha*beta*x(2)/(2*D)+beta^2);

sigma=504000/(x(4)*x(3)^2);

delta=65856000/(30*