30.06.2013 Views

Leader (and sub Leader) Election per uniformare e ... - Automatica

Leader (and sub Leader) Election per uniformare e ... - Automatica

Leader (and sub Leader) Election per uniformare e ... - Automatica

SHOW MORE
SHOW LESS

Create successful ePaper yourself

Turn your PDF publications into a flip-book with our unique Google optimized e-Paper software.

APPENDICE E<br />

Codice MATLAB CAP 6.<br />

E.1 Funzione di scelta della radice con<br />

criterio FigliEquispaziati.<br />

function [W,M,G] = RadiceFigliEquispaziati (statoprec, Mg,C,J,<br />

alfa,beta,radiceprec)<br />

dim = size (Mg);<br />

radice = zeros(dim(1,1),1);<br />

j = 1;<br />

radice(1,1) = 1;<br />

B = MaFigliEquispaziati(Mg,radice);<br />

Q = C + B * ones(dim(1,1),1) + (alfa * eye(dim(1,1)) +<br />

(beta - alfa) * Phi(radiceprec)) * (statoprec + ones(dim(1,1),1));<br />

W = Q - 1/(dim(1,1)) * ones(1,dim(1,1))* Q * ones(dim(1,1),1);<br />

m = W’ * W ;<br />

radice(1,1) = 0;<br />

for l = 2:dim(1,1)<br />

radice(l,1) = 1;<br />

A = MaFigliEquispaziati(Mg,radice);<br />

Q = C + A * ones(dim(1,1),1)+ (alfa * eye(dim(1,1)) + (beta - alfa)<br />

* Phi(radiceprec)) * (statoprec + ones(dim(1,1),1));<br />

W = Q - 1/(dim(1,1)) * ones(1,dim(1,1))* Q * ones(dim(1,1),1);<br />

n = W’ * W;<br />

if (n < m)<br />

j = l;<br />

m = n;<br />

B = A;<br />

end<br />

radice(l,1) = 0;<br />

end<br />

W = m;<br />

M = j;<br />

G = B;<br />

return<br />

58

Hooray! Your file is uploaded and ready to be published.

Saved successfully!

Ooh no, something went wrong!