function [Vessel_Centerline_Segments]=VasosDefinitivos(Sub_Intensidad,Sub_Candidates,Valor_Ref,Vessel_Centerline_Segments)
[filas,columnas]=size(Sub_Intensidad);
if Sub_Candidates(1)~=0
for i=1:columnas
if Sub_Intensidad(i)*sqrt(Sub_Candidates(i,3))>=Valor_Ref
longitud=Sub_Candidates(i,3);
for j=4:2:(2*longitud+3)
Vessel_Centerline_Segments(Sub_Candidates(i,j),Sub_Candidates(i,j+1))=1;
end
end
end
end
e-REdING. Biblioteca de la Escuela Superior de Ingenieros de Sevilla.
