遗传算法

uaidenp

/*arguments参数*/
c1=[16000;500;350;500;2500;1000;0;0;0;0;0;0;0;0]
% Q8 x- ~3 Y* C3 G+ tc2=[3250;1000;350;500;2500;1000;28;27;7;44;0;0;0;0]
+ ~5 M% |6 g: U1 ~, gmypi=[1600;425;213;213;2600;750;11;11;3;18;40800;1200;3000;8000]
e=[0;0;0;0;0;0;0;0;0;0;10200;300;750;2000]
r=[5;4;3;3;3;3;1;1;1;1;2;0;1;0]
& c) L) h# C3 @5 {. a1 r2 {9 l" g
/*fun1*/
function f=Fun1(x,E,mypi)
- Y' @( @/ H9 b8 O# L: t- r    f=x*(E-mypi)-85*x(3)*x(4)-3400*x(12)*x(13)*x(14);
/ t0 n) `4 D6 s6 o  G( uend
! {- v4 r9 S) d5 v1 z
4 i& @, `  |- P8 F4 K0 G. B' [/*main函数*/
ObjectFunction = @Fun1;
" R- i1 h' B& B' l1 M, P5 e+ ^nvars = 14;%变量个数
LB = [0]%定义域下限
& G2 U9 e3 g( n! Y+ F4 ?  BUB = [1]%定义域上限
$ }8 X( z- H$ a0 P# d; gA=[-1,0,0,0,0,0,0,0,0,0,0,0,0,0;-1,1,0,0,0,0,0,0,0,0,0,0,0,0;0,-1,1,0,0,0,0,0,0,0,0,0,0,0;0,-1,0,1,0,0,0,0,0,0,0,0,0,0;0,0,0,0,-1,0,1,0,0,0,0,0,0,0;0,0,0,0,-1,0,0,1,0,0,0,0,0,0;0,0,0,0,-1,0,0,0,1,0,0,0,0,0;0,0,0,0,-1,0,0,0,0,1,0,0,0,0;-1,0,0,0,0,0,0,0,0,0,1,0,0,0;0,0,0,0,0,0,0,0,0,0,-1,1,0,0;0,0,0,0,0,0,0,0,0,0,-1,0,1,0;0,0,0,0,0,0,0,0,0,0,-1,0,0,1]
b=[1;0;0;0;0;0;0;0;0;0;0;0]
[x,fval] = ga(ObjectiveFunction,nvars,A,b,[],[],LB,UB,NonCon)%调用ga函数

; p: y% K! W' g% J' z
7 [, q8 r$ I8 o/ z1 L7 q$ X# N8 a/*非线性约束NonCon*/
6 |1 m+ M, n5 W- |" ?function [c,ceq] = NonCon(x)
; S2 |: }& l, h    %UNTITLED2 此处提供此函数的摘要
, w9 U1 F; H. Q; m" C  G    %   此处提供详细说明
   c=[[x(1),x(2),x(3),x(4),x(5),x(6),x(7),x(8),x(9),x(10),x(11),x(12),x(13),x(14)]*[16000;500;350;500;2500;1000;0;0;0;0;0;0;0;0]-268*x(3)*x(4)-350*x(4)*x(5)-250*x(4)*x(6)-600*x(4)*x(5)*x(6)-20000;[x(1),x(2),x(3),x(4),x(5),x(6),x(7),x(8),x(9),x(10),x(11),x(12),x(13),x(14)]*[3250;1000;350;500;2500;1000;28;27;7;44;0;0;0;0]-155*x(2)*x(3)-255*x(2)*x(4)-188*x(4)*x(3)-200*x(4)*x(5)-175*x(4)*x(6)-125*x(5)*x(6)-375*x(4)*x(5)*x(6)-6000];
   ceq=[];
end
/ B' ]) B1 A) y8 S& t" g+ U& b
) Q- M6 }# \6 @1 W
& ~" a2 `  ^& f, |6 v4 t8 X这个一直报错输入参数不足，错误在Noncon.m的line4，请教大神

lupkpu9

在主函数里你没有给NoNcon传递参数

cichishia

来学习一下

uaidenp

lupkpu9 发表于 2020-7-21 10:20
, d1 O+ f4 m4 d* e在主函数里你没有给NoNcon传递参数

- X, v1 ]; W$ J3 t& g3 {' |  n- |那请问要怎么改呢

小白的白