تنظیم هورمونی

$%function rep2 = delete_pf_pbest(rep,pop_X,pbest) clc; load pop_X.mat; load rep3.mat; load pbest.mat; pop_X=pop_X; pbest=pbest; rep=rep3; [result1,result2,result3,result4] = create_grid_merge(rep,pop_X,pbest); pf_size = 10; num_del = length(rep)-pf_size; N = 10; size_g = zeros(N-1,N-1);%size of each cell of grid for i0 = 1:N-1 for j0 = 1:N-1 result_T{i0,j0} = [result1{i0,j0} result3{i0,j0}]; end end for i1 = 1:1:N-1 for j1 = 1:1:N-1 size_g(i1,j1) = length(result_T{i1,j1}); end end while num_del ~=0 [max_1, index_max1] = max(size_g); [max_2, index_max2] = max(max_1); row_max = index_max1(index_max2); col_max = index_max2; size_g(row_max,col_max) = size_g(row_max,col_max)- 1; num_del = num_del-1; index_f1 = find(result1{row_max,col_max}==result_T{row_max,col_max}(max_2)); if ~isempty(index_f1) f1 = result1{row_max,col_max}(index_f1); f2 = result2{row_max,col_max}(index_f1); for i3 = 1:100 for j3 = 1:10 if(rep(1,j3)==i3)&(f1==pop_X(i3,end-1))&(f2==pop_X(i3,end)) rep(1,j3) = 0; end end end else index_f3 = find(result3{row_max,col_max}==result_T{row_max,col_max}(max_2)); f3 = result3{row_max,col_max}(index_f3); f4 = result4{row_max,col_max}(index_f3); for i3 = 1:100 for j4 = 11:length(rep) if(rep(1,j4)==i3) & (f3==pbest(i3,end-1)) & (f4==pbest(i3,end)) rep(1,j4) = 0; end end end end end k4 = 1; for i4 = 1:length(rep) if rep(1,i4)~=0 rep2(1,k4) = rep(1,i4); k4 = k4+1; end end %end$