%csvread para leer archivos o datos que tengan formato csv
dts= csvread('ciu_colo.csv')
plot(dts(:,2),dts(:,1), '.b');
%programa que escoja una ruta para luego calcular la distancia totak recorrida
nciu= size (dts,1)%cuantas filas y cuantas columnas
mat_dis= zeros (nciu, nciu);
for i= 1:nciu
for j=1:nciu
%sqrt((x2-x1)^2 + (y2-y1)^2)
mat_dis(i,j)= sqrt((dts(i, 1) - dts(j,1))^2 + (dts(i,2) - dts(j,2))^2);
end
end
ale_res=randperm(nciu);
%%%%%%% Crear o modificar el programa de tal manera que la respuesta sea
%%%%%%% mejor a la que se hizo en clase
%fijar los ejes para que sean los mismos para todos los plot
set(gca, 'Xlim', [-81.6903 -67.4930], 'Ylim', [ -4.2200 12.5621]);
hold on %mantiene el grafico sujeto al max y al min
distancia=0;
for i=1:nciu
if i<72
distancia=mat_dis(ale_res(i),ale_res(i+1))+distancia;
else
distancia=mat_dis(ale_res(72),ale_res(1))+distancia;
end
l=sprintf('%0.2f',distancia);
plot(dts(ale_res(1:i),2), dts(ale_res(1:i),1),'b');
legend(l);
pause (0.2)
end
hold off