www.gusucode.com > 《遗传算法工具箱及应用》的源代码 > 《遗传算法工具箱及应用》的源代码/gatbx/gatbx-example/gatbx/targetalloc.m
function [eval]=targetalloc(chrom) %目标函数 [m,n]=size(chrom); %射击有利程度估计值 p=[.87 .52 .11 .78 .72 .69 .94 .72 .36 .28 .27 .74 .24 .78 .45; .87 .52 .11 .78 .72 .69 .94 .72 .36 .28 .27 .74 .24 .78 .45; .87 .52 .11 .78 .72 .69 .94 .72 .36 .28 .27 .74 .24 .78 .45; .87 .52 .11 .78 .72 .69 .94 .72 .36 .28 .27 .74 .24 .78 .45; .87 .52 .11 .78 .72 .69 .94 .72 .36 .28 .27 .74 .24 .78 .45; .87 .52 .11 .78 .72 .69 .94 .72 .36 .28 .27 .74 .24 .78 .45; .62 .87 .70 .22 .80 .42 .43 .90 .13 .95 .18 .19 .12 .61 .35; .48 .20 .42 .16 .43 .58 .69 .03 .34 .72 .15 .24 .29 .30 .75]; %威胁程度评估值 w=[.47 .97 .76 .62 .48 .77 .33 .74 .54 .65 .43 .35 .63 .66 .57]; for i=1:m for j=1:15 chrom(i,j)=p(chrom(i,j),j); end end eval=chrom*w';