> 現在のプログラムのどこにどんなコードを書けばいいのかが分かりません。ご教授願います。
それはつまりプログラムが煩雑になり分かり難くなってしまっているという事でしょう。質問に掲載されたプログラムの一部を回答したのは私です。しかし本質問に回答しようとして、検出器オブジェクトが目と口と顔とバラバラ存在し変数も沢山あるのを一々書き換えていく作業をしていて嫌になってしまいました。
- 上記の点を反省しプログラムの構造を改めました
- 検出枠の回転に対応する為の変換はここでは取り上げませんでした
- 口の検出枠がたくさん出てきてしまうので、場当たり的に一つに絞りました
I = imread('face.jpg');
for Obj = {'FrontalFaceCART','Mouth','EyePairBig'} % 学習済カスケード分類モデル毎に繰り返す
ObjDet = vision.CascadeObjectDetector(Obj{:}); % カスケード検出器のオブジェクト作成
ObjBox = ObjDet(I); % 検出枠の[x, y, width, height]情報
if(strcmp(Obj,'Mouth')) % 口の検出時に行う処理
ObjBox(ObjBox(:,2) < size(I,1)/2, :) = []; %【暫定】画像の上半分に検出された口の検出枠を削除
ObjBox(ObjBox(:,3) ~= max(ObjBox(:,3)), :) = []; %【暫定】幅が最大の物を残し口の検出枠を削除
MouthBox = [ObjBox(:,1), ObjBox(:,2), ObjBox(:,3), ObjBox(:,4)/2]; % 口の上半分
I = insertShape(I,'rectangle', MouthBox, 'Color', 'red', 'LineWidth', 3); % 追記
ObjCen = get_centroid(MouthBox); % 検出枠の重心[x,y]座標。これを画像に追記する
I = insertShape(I, 'FilledCircle', [ObjCen ones(size(ObjBox,1),1)*5]); % 追記
Triangle(3,:) = ObjCen; % 三角形の座標を保持
end
if(~strcmp(Obj,'FrontalFaceCART')) % 顔の検出時以外に行う処理
I = insertObjectAnnotation(I, 'rectangle', ObjBox, Obj); % 画像に検出枠を追記
end
if(strcmp(Obj,'EyePairBig')) % 両目の検出時に行う処理
for wd = 0:1 % 検出枠の左上x座標に幅の1/6または4/6を足し、幅を1/6にする⇒左目枠/右目枠の作成
EyeBox = [ObjBox(:,1)+ObjBox(:,3)*(1+wd*3)/6, ObjBox(:,2), ObjBox(:,3)/6, ObjBox(:,4)];
EyeCen = get_centroid(EyeBox); % 検出枠の重心[x,y]座標
I = insertShape(I,'rectangle', EyeBox, 'Color', 'red', 'LineWidth', 3);
I = insertShape(I, 'FilledCircle', [EyeCen ones(size(ObjBox,1),1)*5]);
Triangle(wd+1,:) = EyeCen; % 三角形の座標を保持
if(wd == 1) % 三角形の座標が揃った時(口の検出後⇒左目の検出後⇒右目の検出時)に行う
triangle = polyshape(Triangle(:,1),Triangle(:,2)); % 重心点を結んだ三角形を定義
[Trcntx, Trcnty] = centroid(triangle); % 三角形の重心
I = insertShape(I, 'Polygon', Triangle, 'Color', 'green'); % 三角形を画像に追記する
I = insertShape(I, 'FilledCircle', [Trcntx, Trcnty, 5], 'Color', 'red'); % 三角形の重心を画像に追記する
end
end
end
release(ObjDet);
end
imshow(I)
function Center = get_centroid(xywh) % 検出枠の重心[x,y]座標を求める
Center = [xywh(:,1) + xywh(:,3)/2, xywh(:,2) + xywh(:,4)/2];
end
