旋转卡壳算法 poj2187 poj3608

旋转卡壳算法 poj2187 poj3608

    旋转卡壳可以用于求凸包的直径、宽度，两个不相交凸包间的最大距离和最小距离等。虽然算法的思想不难理解，但是实现起来真的很容易让人“卡壳”。
   拿凸包直径(也就是凸包上最远的两点的距离）为例，原始的算法是这样子：
  
      

1. Compute the polygon's extreme points in the y direction. Call them ymin and ymax.
2. Construct two horizontal lines of support through ymin and ymax. Since this is already an anti-podal pair, compute the distance, and keep as maximum.
3. Rotate the lines until one is flush with an edge of the polygon.
4. A new anti-podal pair is determined. Compute the new distance, compare to old maximum, and update if necessary.
5. Repeat steps 3 and 4 until the anti-podal pair considered is (ymin,ymax) again.
6. Output the pair(s) determining the maximum as the diameter pair(s).

   更具体的可参见http://cgm.cs.mcgill.ca/~orm/rotcal.frame.html
      

   直接按照这个描述可以实现旋转卡壳算法，但是代码肯定相当冗长。逆向思考，如果q_a，q_b是凸包上最远两点，必然可以分别过q_a，q_b画出一对平行线。通过旋转这对平行线，我们可以让它和凸包上的一条边重合,如图中蓝色直线，可以注意到，q_a是凸包上离p和q_b所在直线最远的点。于是我们的思路就是枚举凸包上的所有边，对每一条边找出凸包上离该边最远的顶点，计算这个顶点到该边两个端点的距离，并记录最大的值。直观上这是一个O(n²)的算法，和直接枚举任意两个顶点一样了。但是注意到当我们逆时针枚举边的时候，最远点的变化也是逆时针的，这样就可以不用从头计算最远点，而可以紧接着上一次的最远点继续计算(详细的证明可以参见上面链接中的论文)。于是我们得到了O(n)的算法。

// 计算凸包直径，输入凸包ch，顶点个数为n，按逆时针排列，输出直径的平方
int  rotating_calipers(Point  * ch, int  n)
{
    int q=1,ans=0;
    ch[n]=ch[0];
    for(int p=0;p<n;p++)
    {
        while(cross(ch[p+1],ch[q+1],ch[p])>cross(ch[p+1],ch[q],ch[p]))
            q=(q+1)%n;
        ans=max(ans,max(dist2(ch[p],ch[q]),dist2(ch[p+1],ch[q+1])));            
    }
    return ans; 
}

   很难想象这个看起来那么麻烦的算法只有这么几行代码吧！其中cross函数是计算叉积，可以想成是计算三角形面积，因为凸包上距离一条边最远的点和这条边的两个端点构成的三角形面积是最大的。之所以既要更新(ch[p],ch[q])又要更新(ch[p+1],ch[q+1])是为了处理凸包上两条边平行的特殊情况。

   poj2187要求的是平面点集上的最远点对，实际上就是该点集的凸包的直径。可能该题数据求得的凸包顶点数都不多，所以旋转卡壳算法相比普通的枚举算法并没有明显的优势。完整代码如下。

poj2187
#include <cmath>
#include <algorithm>
#include <iostream>
using namespace std;
#define MAXN 50005

struct Point
{
    int x, y;
    bool operator < (const Point& _P) const
    {
        return y<_P.y||(y==_P.y&&x<_P.x);
    };
}pset[MAXN],ch[MAXN];

void convex_hull(Point *p,Point *ch,int n,int &len)
{
    sort(p, p+n);
    ch[0]=p[0];
    ch[1]=p[1];
    int top=1;
    for(int i=2;i<n;i++)
    {
        while(top>0&&cross(ch[top],p[i],ch[top-1])<=0)
            top--;
        ch[++top]=p[i];
    }
    int tmp=top;
    for(int i=n-2;i>=0;i--)
    {
        while(top>tmp&&cross(ch[top],p[i],ch[top-1])<=0)
            top--;
        ch[++top]=p[i];
    }
    len=top;    
}

int cross(Point a,Point b,Point o)      
{
    return (a.x - o.x) * (b.y - o.y) - (b.x - o.x) * (a.y - o.y);
}

int dist2(Point a,Point b)
{
    return (a.x - b.x) * (a.x - b.x) + (a.y - b.y) * (a.y - b.y);
}

int rotating_calipers(Point *ch,int n)
{
    int q=1,ans=0;
    ch[n]=ch[0];
    for(int p=0;p<n;p++)
    {
        while(cross(ch[p+1],ch[q+1],ch[p])>cross(ch[p+1],ch[q],ch[p]))
            q=(q+1)%n;
        ans=max(ans,max(dist2(ch[p],ch[q]),dist2(ch[p+1],ch[q+1])));            
    }
    return ans; 
}

int main()
{
    //freopen("in.txt","r",stdin);
    int n, len;
    while(scanf("%d", &n)!=EOF)
    {
        for(int i = 0;i < n;i++)
        {
            scanf("%d %d",&pset[i].x,&pset[i].y);
        }
        convex_hull(pset,ch,n,len);
        printf("%d\n",rotating_calipers(ch,len));
    }
    return 0;
}

   poj3608 要求的是两个凸包的最近距离。这比求凸包直径麻烦了许多。我的基本思想还是分别枚举两个凸包的边，但是有些细节没能完全证明是正确的。虽然AC了，但目前这还只是一个看起来正确的算法。这题的中间过程还需要计算点到线段的距离和两条平行线段的距离，比起2187麻烦了许多。

poj3608
#include <iostream>
#include <algorithm>
#include <cmath>
using namespace std;
#define MAXN 50000
#define EPS 1e-9
struct Point
{
    double x,y;
    Point (){}
    Point (double _x,double _y){x=_x;y=_y;}
}pm[MAXN],pn[MAXN];

double cross(Point a,Point b,Point o)
{
    return (o.x-a.x)*(o.y-b.y)-(o.x-b.x)*(o.y-a.y);
}

double dist(Point a,Point b)
{
    return (a.x-b.x)*(a.x-b.x)+(a.y-b.y)*(a.y-b.y);
}

double dot(Point a,Point b)
{
    return a.x*b.x+a.y*b.y;
}

void anticolockwise(Point *ch,int len)
{
    for(int i=0;i<len-2;i++)
    {
        double tmp=cross(ch[i],ch[i+1],ch[i+2]);
        if(tmp>EPS)
            return;
        else if(tmp<-EPS)
        {
            reverse(ch,ch+len);
            return;
        }
    }
}

double dis_point_to_seg(Point c,Point a,Point b)
{
    Point ab=Point(b.x-a.x,b.y-a.y);
    Point ac=Point(c.x-a.x,c.y-a.y);
    double f=dot(ab,ac);
    if(f<0) return dist(a,c);
    double D=dot(ab,ab);
    if(f>D) return dist(b,c);
    f=f/D;
    Point d=Point(a.x+f*ab.x,a.y+f*ab.y);
    return dist(d,c);
}

double dis_pall_seg(Point p1, Point p2, Point p3, Point p4)
{
    return min(min(dis_point_to_seg(p1, p3, p4), dis_point_to_seg(p2, p3, p4)),
     min(dis_point_to_seg(p3, p1, p2), dis_point_to_seg(p4, p1, p2)));
}

double rc(Point *ch1,Point *ch2,int n,int m)
{
    int q=0;
    int p=0;
    for(int i=0;i<n;i++) 
        if(ch1[i].y-ch1[p].y<-EPS)
            p=i;
    for(int i=0;i<m;i++)
        if(ch2[i].y-ch2[q].y>EPS)
            q=i;
    ch1[n]=ch1[0];
    ch2[m]=ch2[0];
    double tmp,ans=1e99;
    for(int i=0;i<n;i++)
    {
        while((tmp=cross( ch1[p+1],ch2[q+1],ch1[p]) - cross(ch1[p+1],ch2[q],ch1[p]) )>EPS)
            q=(q+1)%m;
        if(tmp<-EPS)
            ans=min(ans,dis_point_to_seg(ch2[q],ch1[p],ch1[p+1]));
        else
            ans=min(ans,dis_pall_seg(ch1[p],ch1[p+1],ch2[q],ch2[q+1]));
        p=(p+1)%n;
    }
    return ans;
            
}

int main()
{
    //freopen("in.txt","r",stdin);
    int n,m;
    while(scanf("%d %d",&n,&m))
    {
        if(n==0&&m==0)
            break;
        for(int i=0;i<n;i++)
            scanf("%lf %lf",&pn[i].x,&pn[i].y);
        for(int i=0;i<m;i++)
            scanf("%lf %lf",&pm[i].x,&pm[i].y);
        anticolockwise(pn,n);
        anticolockwise(pm,m);
        printf("%.5f\n",sqrt(min(rc(pn,pm,n,m),rc(pm,pn,m,n))));
    }
    return 0;
}