Tuesday, October 6, 2009

Image Segmentation using watershed algorithm in IDL

;##############################################

; Image Segmentation using watershed algorithm

; Author : S.GaneshBabu

;##############################################

PRO EX16

file=DIALOG_PICKFILE(PATH='E:\Image')

im=READ_IMAGE(file)

sz=size(im,/DIMENSIONS)

R=15; radious of disk

disc=SHIFT(DIST(2*R+1),R,R) LE R

b=MAX(im)-im

tvscl,b,0

c=MORPH_CLOSE(b,disc,/GRAY)

TVSCL,c,1

d=WATERSHED(c)

TVSCL,d,2

e= im > (max(im) * (d EQ 0b))

TVSCL,e,3

END

;##############################################

; Image Segmentation using watershed algorithm

; Author : S.GaneshBabu

;##############################################

PRO EX16

file=DIALOG_PICKFILE(PATH='E:\Image')

im=READ_IMAGE(file)

sz=size(im,/DIMENSIONS)

R=15; radious of disk

disc=SHIFT(DIST(2*R+1),R,R) LE R

b=MAX(im)-im

tvscl,b,0

c=MORPH_CLOSE(b,disc,/GRAY)

TVSCL,c,1

d=WATERSHED(c)

TVSCL,d,2

e= im > (max(im) * (d EQ 0b))

TVSCL,e,3

END

No comments: