load TEC
load posicion
[i,j]=unique(TEC(:,1)); %Busca valores unicos de longitud
[k,l]=unique(TEC(:,2)); %Busca valores unicos de latitud
%posicion=[i,k]; difieren en tamaño i,k y la matriz posicion no se arma
%automaticamente!!
puntos_grilla=245;
sd=[0];
dd=[0];
for i=1:puntos_grilla
k=find(TEC(:,1)==posicion(i,1)& TEC(:,2)==posicion(i,2));
interm=TEC(k,:);
sd=diff(interm(:,3))
end
load posicion
puntos_grilla=245;
sd=[];
dd=[];
for i=1:puntos_grilla
k=find(TEC(:,1)==posicion(i,1)& TEC(:,2)==posicion(i,2));
interm=TEC(k,:);
sd(:,i)=diff(interm(:,3));
end
sd(:,i)=diff(interm(:,3))