matlab练习程序（最小包围矩形）

又是计算几何，我感觉最近对计算几何上瘾了。

当然，工作上也会用一些，不过工作上一般直接调用boost的geometry库。

上次写过最小包围圆，这次是最小包围矩形，要比最小包围圆复杂些。

最小包围矩形可不一定是个直立的矩形，也可能像下图一样是倾斜的。

求法如下：

1.求多边形凸包，这里凸包直接调用系统函数了，细节可以参考这里，虽然当时写的不怎么样。

2.将凸包两个相邻的点连线作为矩形一条边。

3.寻找凸包上距离已得到的边最远的点，过该点做平行线，得到矩形第二条边。

4.将凸包上点向已求得的边投影，求得投影点相距最远的两个点，过该两点做直线，作为矩形另外两条边。

5.遍历凸包所有相邻两点从新运行2~4，将面积最小的矩形作为求得结果。

通常情况下，矩形会过随机点中的5个点。

结果如下：

matlab代码如下：

clear all;close all;clc;

n=;
p=rand(n,);

ind=convhull(p(:,),p(:,));
l=length(ind);

hull=p(ind,:);          %随机点凸包

area=inf;
for i=:l
    p1=hull(i-,:);     %凸包上两个点
    p2=hull(i,:);

    k1=(p1()-p2())/(p1()-p2());     %连接两点的直线，作为矩形的一条边
    b1=p1()-k1*p1();

    d=abs(hull(:,)*k1-hull(:,)+b1)/sqrt(k1^+);  %所有凸包上的点到k1,b1直线的距离

    [h ind]=max(d);                     %得到距离最大的点距离，即为高，同时得到该点坐标
    b2=hull(ind,)-k1*hull(ind,);      %相对k1,b1直线相对的另一条平行边k1,b2;

    k2=-/k1;                           %以求得的直线的垂线斜率

    b=hull(:,)-k2*hull(:,);           %过凸包所有点构成的k2,b直线系
    x1=-(b1-b)/(k1-k2);                 %凸包上所有点在已求得的第一条边的投影
    y1=-(-b*k1+b1*k2)/(k1-k2);

    x2=-(b2-b)/(k1-k2);                 %凸包上所有点在已求得的第二条边的投影
    y2=-(-b*k1+b2*k2)/(k1-k2);

    [junk indmax1]=max(x1);             %投影在第一条边上x方向最大与最小值
    [junk indmin1]=min(x1);

    [junk indmax2]=max(x2);             %投影在第二条边上x方向最大与最小值
    [junk indmin2]=min(x2);

    w=sqrt((x1(indmax1)-x1(indmin1))^+(y1(indmax1)-y1(indmin1))^);    %矩形的宽

    if area>=h*w                        %使面积最小
        area=h*w;
        pbar=[x1(indmax1) y1(indmax1);  %矩形四个角点
              x2(indmax2) y2(indmax2);
              x2(indmin2) y2(indmin2);
              x1(indmin1) y1(indmin1)];
    end
end
pbar(,:)=pbar(,:);

hold on;
plot(p(:,),p(:,),'.');
plot(pbar(:,),pbar(:,),'r')
axis equal;