Replaceability_Computation.m

for i=1:1:length(SuppliersNew)
    competitors=0;
   for j=1:1:length(SuppliersNew)
         if (i==j)
             competitors(j)=0;
             continue;
         end    
         %  competitor se ho la stessa coppia di indici in Suppliers.
         % ed ovviamente sono dello stesso livello
         if (strcmp(SuppliersNew(j).Product,SuppliersNew(ActiveSuppliers(i)).Product))
             for k=1:2:length(SuppliersNew(j).Suppliers)
                 coppia=SuppliersNew(j).Suppliers(k:k+1);
                 for h=1:2:length(SuppliersNew(ActiveSuppliers(i)).Suppliers)
                     if (sum(coppia==SuppliersNew(ActiveSuppliers(i)).Suppliers(h:h+1))==2)
                         competitors(j)=1;
                     end
                 end
             end
         end             
   end
   % pi si avvicina a 1 pi  rimpiazzabile con altri
   % non essere rimpiazzabile spinge all'attacco perch non posso essere
   % escluso ho gia 0.9 se ne ho 10 di competitors
   Replaceability(i)=1-(1/(sum(competitors==1)+1));   
end