function[face_a,skin_region]=face(I);skin_region=skin(I);se=strel('disk',5);se2=strel('disk',3);er=imerode(skin_region,se2);cl=imclose(er,se);dil=imdilate(cl,se);%morphologicdilationdil=imdilate(dil,se);cl2=imclose(dil,se);d2=imfill(cl2,'holes');%morphologicf