传算法在道路图像阈值（Propagation algorithm in road image threshold）.docVIP

传算法在道路图像阈值（Propagation algorithm in road image threshold） 功能main() 清除所有 关闭所有 中图分类号 全球铬oldpop健身lchrom popsize cross_rate mutation_rate yuzhisum 全球maxgen m n适合创宇A B C oldpop1 popsize1 B B1 fitness1 yuzhi1 = imread（mh .jpg”）；%读入道路图像 %＝imresize（一，0.4）； B = rgb2gray（一）；%灰度化 C = B； C = imresize（B，0.1）；%将读入的图像缩小 lchrom = 8；%染色体长度 种群大小popsize = 10；% cross_rate = 0.7；%交叉概率 mutation_rate = 0.4；%变异概率 maxgen = 150；%最大代数 m，n =大小（c）； “计算中，请稍等…” initpop；%初始种群 代= 1：maxgen 代遗传操作；% 结束 findresult；%图象分割结果 % % %输出进化各曲线 图； Gen = 1：maxgen； 情节（根，适合（1，Gen））； 标题（“最佳适应度值进化曲线”）； 图； 情节（创，玉芝（1代））； 标题（“每一代的最佳阈值进化曲线”）； %%%%%%%%%%%%%%%%%%%初始化种群%%%%%%%%%%%%%%%%%%%% 功能initpop() 全球lchrom oldpop popsize铬C imshow（C）； 我= 1：popsize 色=兰特（1，lchrom）； J = 1：lchrom 如果铬（1，j）＜0.5 铬（1，j）= 0； 其他的 铬（1，j）= 1； 结束 结束 oldpop（I，1：lchrom）=铬； 结束 %%%%%%%%%%%%%%%%%产生新一代个体%%%%%%%%%%%%%%%%%%%%%% 功能generation() fitness_order；%计算适应度值及排序 选择选择操作；% %交叉交叉； %变异突变； %%%%%%%%%%%%%%%%%计算适度值并且排序%%%%%%%%%%%%%%%%%%% 功能fitness_order() 全球lchrom oldpop健身popsize铬配合创C M N fitness1 yuzhisum 全球lowsum higsum U1 U2智创oldpop1 popsize1 B1 yuzhi1 如果popsize = 5 popsize =细胞（popsize-0.03 *创）； 结束 如果根= = 75%当进化到末期的时候调整种群规模和交叉、变异概率 cross_rate = 0.3；%交叉概率 mutation_rate = 0.3；%变异概率 结束 %如果不是第一代则将上一代操作后的种群根据此代的种群规模装入此代种群中 如果根 1 T = oldpop； J = popsize1； 我= 1：popsize 如果j＝1 oldpop（我，：）= T（J，：）； 结束 J = J-1； 结束 结束 %计算适度值并排序 我= 1：popsize lowsum = 0； higsum = 0； lownum = 0； hignum = 0； 色= oldpop（我，：）； c＝0； J = 1：lchrom C = C +铬（1，j）*（2 ^（lchrom-j））； 结束 B（1，i）= C * 255 /（2 ^ lchrom-1）；%转化到灰度值 对于x = 1：m 对于y = 1：n 如果c（x，y） b（1，i） lowsum = lowsum +双（C（x，y））；%统计低于阈值的灰度值的总和 lownum = lownum±1；%统计低于阈值的灰度值的像素的总个数 其他的 higsum = higsum +双（C（x，y））；%统计高于阈值的灰度值的总和 hignum = hignum±1；%统计高于阈值的灰度值的像素的总个数 结束 结束 结束 如果lownum ~ = 0 U1＝lowsum / lownum；%、为对应于两类的平均灰度值U1 U2 其他的 U1＝0； 结束 如果hignum ~ = 0 U2 = higsum / hignum； 其他的 U2 = 0； 结束 健身（1，i）= lownum * hignum *（u1-u2）^ 2；%计算适度值 结束 如果根= = 1%如果为第一代，从小往大排序 我= 1：popsize j = i + 1； 而J = popsize 如果健身（1，I）健身（1，J） tempf =健身（1，i）； tempc = oldpop（我，：