道路中心线检测

matlab代码，能检测出图像道路中心线，并画出

I=imread（‘z12R.jpg‘）;
I=im2bw（I0.6）;
SE1=strel（‘square‘ 3）;
R=imerode（ISE1）;             % “腐蚀”运算
Edge_Road=I-R;                %  边缘检测
[yx]=size（I）;
Px=zeros（y1）;
CenterR=zeros（yx）;
for j=1:y                     % 路径中线检测
    i=1;
    while（（Edge_Road（ji）~=1）&&（i            i=i+1;
    end
    if （i        P1=i;                 % 路径左边缘位置
    end
    
    i=x;
    while（（Edge_Road（ji）~=1）&&（i>1））
            i=i-1;
    end
    if （i>1）
        P2=i;                % 路径右边缘位置
    end
   
    Px（j）=round（（P1+P2）/2）;  % 路径中线位置
    CenterR（jPx（j））=1;      
end
    
figureimshow（R）;
figureimshow（Edge_Road）;
figureimshow（CenterR）;

 属性            大小     日期    时间   名称
----------- ---------  ---------- -----  ----

     文件        719  2004-04-04 18:58  P0904.m

     文件      36241  2003-12-15 14:18  RoadG2.jpg

----------- ---------  ---------- -----  ----

                36960                    2