faceDetector = vision.CascadeObjectDetector;
I = imread('frida.jpg');
bboxesFace = faceDetector(I);
face = imcrop(I,bboxesFace);
noseDetector = vision.CascadeObjectDetector('Nose');
bboxes = noseDetector(face);
[a,b] = size(bboxes);
max = bboxes(1,3) * bboxes(1,4);
vet = bboxes(1,:);

for k=1:a
    temp = bboxes(k,3) * bboxes(k,4);
    if( temp > max)
        max = temp;
        vet = bboxes(k,:);
    end
end
iFaces = insertObjectAnnotation(face,'rectangle',vet,'Naso');
figure
imshow(iFaces);