function P=ajuste_potencia(potencia)
%Funcion que realiza el ajuste de potencia cuando no tengamos un numero,
%basandose en valores anteriores, con la siguiente prioridad
%  *---*---*         *---*---*
%  |   | 2 |         | 2 |NaN| 
%  *---*---* ------> *---*---* Equivalente en el mapa de facetas
%  | 1 |NaN|         |   | 1 |
%  *---*---*         *---*---*
P=0;
cont=0;
[fil col]=size(potencia);
for i=1:fil
    for j=1:col
        if(isnan(potencia(i,j))==0)
            P=P+potencia(i,j);
            cont=cont+1;
        end
    end
end        
% if(isnan(potencia(2,1))==0)
%     P=P+potencia(2,1);
%     cont=cont+1;
% end
% if(isnan(potencia(1,2))==0)
%     P=P+potencia(1,2);
%     cont=cont+1;
% end
P=P/cont;



                
        