%函數regiongrow.m: 像素聚類區域成長法%
function [O_image]=regiongrow(I_image,seed,region_th,stopn)
%[O_image]=regiongrow(I_image,seed,region_th,stopn)%
%I_image : (row x col) 輸入圖像%  
%seed : [yseed xseed] 輸入一聚合種子的坐標%
%region_th : (0<= region_th <=255) 區域臨界值%
%stopn : (0<stopn<=inf) 中斷臨界值：控制中斷程序的聚合像素個數%
%O_image : (row x col) 經過像素聚類區域成長后的輸出圖像%

O_image=I_image;
[row,col]=size(O_image);
%將種子放入隊列中
yseed=seed(1);
xseed=seed(2);
pixel_seed=I_image(yseed,xseed);  %種子的像素值