I have another reference link please look at reply me me how to get lip region Visual Reading also i have tried below code but not get clear any solution ?
if true
% code
hautoth = vision.Autothresholder;
img = step(hcsc, mouthcrop);
img = im2single(rgb2gray(img));
bin = step(hautoth,img);
binaryImage = imfill(bin, 'holes');
binaryImage = bwareaopen(binaryImage,500);
labeledImage = bwlabel(binaryImage, 8);
blobMeasurements = regionprops(labeledImage, 'BoundingBox');
numberOfBlobs = size(blobMeasurements, 1);
% subplot(3, 3, 5); imagesc(mouthcrop);
% title('Outlines, from bwboundaries()'); axis square;
% hold on
% for k = 1 : numberOfBlobs
% thisBlobsBoundingBox = blobMeasurements(k).BoundingBox;
% rectangle('Position',thisBlobsBoundingBox,'EdgeColor','r','LineWidth',2);
% end
% hold off
end