by HPC_ZY
圆的物体,在实际拍摄中由于种种原因可能会变成椭圆,用圆拟合就不够准确。这里分享一篇文献中椭圆检测的方法(代码使用方法)。
% 编译C++源码供MATLAB调用
mex generateEllipseCandidates.cpp...
-ID:\opencv2\build\include... % 请使用你的OpenCV路径
-ID:\opencv2\build\include\opencv... % 请使用你的OpenCV路径
-ID:\opencv2\build\include\opencv2... % 请使用你的OpenCV路径
-LD:\opencv2\build\x64\vc11\lib... % 请使用你的OpenCV路径
-ID:\MATLAB\extern\include... % 请使用你的MATLAB路径
-LD:\MATLAB\extern\lib\win64\microsoft... % 请使用你的MATLAB路径
-lopencv_core249... % 请使用你的OpenCV版本
-lopencv_highgui249... % 请使用你的OpenCV版本
-lopencv_imgproc249... % 请使用你的OpenCV版本
-llibmwlapack.lib
% 注意:替换的时候,不要把前面的 -I,-L,-l 删了
如果觉得麻烦,可以在文末链接直接下载。(已编译且内置动态库)
% 这是论文自带的图片(可替换成你自己的)
im = imread('.\pics\43.jpg');
% 论文检测椭圆的核心代码
[ellipses, ~, ~] = ellipseDetectionByArcSupportLSs(im, 120, 0.3, 0); % 输入输出后面会讲到
% 论文自带的显示结果的代码
drawEllipses(ellipses',im);
Tac:椭圆完整度,测试代码如下
(为了更人性化进行了修改,可自定义颜色,如有需要文末有下载地址)
%% 第一个参数 Tac
im = imread('.\pics\test1.png');
Tacs = [90,180,190,270,300,350];
for k = 1:6
% Tr统一用0.1
[ellipses, L, posi] = ellipseDetectionByArcSupportLSs(im, Tacs(k), 0.1, 0);
subplot(2,3,k),drawEllipses(ellipses',im,[1,0,0]); % 为了使用方便进行了修改,可自定义颜色
title(['\fontsize{14}Tac = ',num2str(Tacs(k))])
end
实验结果如下,所以当你要找的目标是比较完整时,可以将Tac调大,从而达到剔除残缺椭圆的效果;反之你的目标可能被遮挡(只露出一部分时),可以将Tac调小,以确保不漏掉任何可能。
Tr:椭圆边缘点数量比列系数(用于判断构成一个椭圆的点数是否足够,不代表具体的值)
举例说明,如下图左边的椭圆Tr值就小于右边的椭圆(设置合适的Tr,就能剔除左边保留右边)
测试代码如下
%% 第二个参数 Tr
im = imread('.\pics\test2.jpg');
Trs = [0.1,0.2,0.3,0.5,0.7,0.9];
for k = 1:6
% Tac统一用30
[ellipses, L, posi] = ellipseDetectionByArcSupportLSs(im, 30, Trs(k), 0);
subplot(2,3,k)
drawEllipses(ellipses',im,[1,0,0]); % 为了使用方便进行了修改,可自定义颜色
title(['\fontsize{14}Tr = ',num2str(Trs(k))])
end
实验结果如下,大致就是Tac取得越小,找到的椭圆越多,但“假目标”也越多。
sp:椭圆正负性,描述椭圆内外灰度情况(正-内亮外暗,负-外暗内亮),测试代码如下
%% 第三个参数sp
if 1
im = imread('.\pics\test3.png');
sp = [1,-1,0];
for k = 1:3
[ellipses, L, posi] = ellipseDetectionByArcSupportLSs(im, 30, 0.2, sp(k));
subplot(1,3,k)
drawEllipses(ellipses',im,[1,0,0]); % 为了使用方便进行了修改,可自定义颜色
title(['\fontsize{14}sp = ',num2str(sp(k))])
end
end
实验结果如下,取1只搜索比背景亮的椭圆,反之只搜索比背景暗的椭圆,取0则全部搜索。
% 这是论文自带的图片
im = imread('.\pics\43.jpg');
% 论文检测椭圆的核心代码
%% 输出参数
[ellipses, E, candidates] = ellipseDetectionByArcSupportLSs(im, 120, 0.3, 0);
% 显示结果
figure,imshow(im)
drawEllipses(ellipses',im,[1,0,0]); % 为了使用方便进行了修改,可自定义颜色
figure,imshow(E)
drawEllipses(candidates',im,[0,1,0]); % 为了使用方便进行了修改,可自定义颜色
有时在复杂场景下,通过调节Tac,Tr,sp也不能定位到自己想要的“椭圆”时,可以对输出数据进一步筛选。
im = imread('.\pics\filt1.jpg');
minsize = [30,40,50,60];
for k = 1:4
% 找到所有椭圆
[ellipses, L, posi] = ellipseDetectionByArcSupportLSs(im, 180, 0.3, 0);
% 找到尺寸较小的
b = ellipses(:,4); % 短轴长
idx = find(b<minsize(k));
% 剔除
ellipses(idx,:) = [];
% 显示
subplot(2,2,k)
drawEllipses(ellipses',im,[1,0,0]); % 为了使用方便进行了修改,可自定义颜色
title(['\fontsize{14}minsize = ',num2str(minsize(k))])
end
im = imread('.\pics\filt2.jpg');
ratio = [3,2,1.2,1.05];
for k = 1:4
% 找到所有椭圆
[ellipses, L, posi] = ellipseDetectionByArcSupportLSs(im, 180, 0.3, 0);
% 找到椭度过大的
a = ellipses(:,3);
b = ellipses(:,4);
idx = find(a./b>ratio(k));
% 剔除
ellipses(idx,:) = [];
% 显示
subplot(2,2,k)
drawEllipses(ellipses',im,[1,0,0]); % 为了使用方便进行了修改,可自定义颜色
title(['\fontsize{14}minsize = ',num2str(ratio(k))])
end
im = imread('.\pics\filt3.jpg');
axs = [pi/2,0,pi/4,-pi/4];
for k = 1:4
% 找到所有椭圆
[ellipses, L, posi] = ellipseDetectionByArcSupportLSs(im, 180, 0.3, 0);
% 找到超出指定轴位范围的
ax = ellipses(:,5);
idx = find(ax<axs(k)-0.3|ax>axs(k)+0.3);
% 剔除
ellipses(idx,:) = [];
% 显示
subplot(2,2,k)
drawEllipses(ellipses',im,[1,0,0]); % 为了使用方便进行了修改,可自定义颜色
title(['\fontsize{14}ax = ',num2str(axs(k)/pi*180),'°'])
end