POJ-1743-Musical Theme-后缀数组

 

转载自http://www.cnblogs.com/yefeng1627/archive/2013/08/02/3233611.html

题意：有N(1 <= N <=20000)个音符的序列来表示一首乐曲，每个音符都是1..88范围内的整数，现在要找一个重复的主题。“主题”是整个音符序列的一个子串，它需要满足如下条件：

    1.长度至少为5个音符。

    2.在乐曲中重复出现。(可能经过转调，“转调”的意思是主题序列中每个音符都被加上或减去了同一个整数值)

    3.重复出现的同一主题不能有公共部分。

输出最长的一个

第二部分处理直接求一个相邻差，根据这个来判断就化简了题目了。

则二分枚举长度k

对于每个k的判断就是根据k将height分组，判断每组里相距最远的串是否满足idx之差大于等于k（不重复）

#include<cstdio>
#include<cstdlib>
#include<cstring>
#include<cmath>
#include<vector>
#include<algorithm>
using namespace std;
const int N = int(2e4)+10;
int cmp(int *r,int a,int b,int l)
{
    return (r[a]==r[b]) && (r[a+l]==r[b+l]);
}
// 用于比较第一关键字与第二关键字,
// 比较特殊的地方是,预处理的时候,r[n]=0(小于前面出现过的字符)

int wa[N],wb[N],ws[N],wv[N];
int rank[N],height[N];
void DA(int *r,int *sa,int n,int m)  //此处N比输入的N要多1，为人工添加的一个字符，用于避免CMP时越界
{
    int i,j,p,*x=wa,*y=wb,*t;
    for(i=0; i<m; i++) ws[i]=0;
    for(i=0; i<n; i++) ws[x[i]=r[i]]++;
    for(i=1; i<m; i++) ws[i]+=ws[i-1];
    for(i=n-1; i>=0; i--) sa[--ws[x[i]]]=i; //预处理长度为1
    for(j=1,p=1; p<n; j*=2,m=p) //通过已经求出的长度J的SA，来求2*J的SA
    {
        for(p=0,i=n-j; i<n; i++) y[p++]=i; // 特殊处理没有第二关键字的
        for(i=0; i<n; i++) if(sa[i]>=j) y[p++]=sa[i]-j; //利用长度J的，按第二关键字排序
        for(i=0; i<n; i++) wv[i]=x[y[i]];
        for(i=0; i<m; i++) ws[i]=0;
        for(i=0; i<n; i++) ws[wv[i]]++;
        for(i=1; i<m; i++) ws[i]+=ws[i-1];
        for(i=n-1; i>=0; i--) sa[--ws[wv[i]]]=y[i]; //基数排序部分
        for(t=x,x=y,y=t,p=1,x[sa[0]]=0,i=1; i<n; i++)
            x[sa[i]]=cmp(y,sa[i-1],sa[i],j)?p-1:p++;  //更新名次数组x[],注意判定相同的
    }
}

void calheight(int *r,int *sa,int n)  // 此处N为实际长度
{
    int i,j,k=0;        // height[]的合法范围为 1-N, 其中0是结尾加入的字符
    for(i=1; i<=n; i++) rank[sa[i]]=i; // 根据SA求RANK
    for(i=0; i<n; height[rank[i++]] = k ) // 定义：h[i] = height[ rank[i] ]
        for(k?k--:0,j=sa[rank[i]-1]; r[i+k]==r[j+k]; k++); //根据 h[i] >= h[i-1]-1 来优化计算height过程
}

int n;
vector<int > sb[N];
int aa[N],sa[N];
bool bin(int k)
{
    bool flag=false;
    int p=-1;
    for (int i=1; i<=n; i++)
    {
        if (height[i]<k) sb[++p].clear();
        sb[p].push_back(i);
    }
    for (int i=0; i<=p; i++)
    {
        int maxx=-1;
        int minn=N;
        if (sb[i].size()>1)
            for (int j=0; j<sb[i].size(); j++)
            {
                maxx=max(maxx,sa[sb[i][j]]);
                minn=min(minn,sa[sb[i][j]]);
                if (maxx-minn>=k) return true;
            }
    }
    return false;
}
int solve()
{
    DA(aa,sa,n+1,200);
    calheight(aa,sa,n);
    int l=0,r=n,ans=0;
    while(l<=r)
    {
        int m=(l+r)>>1;
        if (bin(m))ans=m,l=m+1;
        else r=m-1;
    }
    return ans>=4?(1+ans):0;
}
int main ()
{
    while(scanf("%d",&n)!=EOF)
    {
        if (!n)break;
        for (int i=0; i<n; i++)
            scanf("%d",&aa[i]);
        for (int i=0; i<n-1; i++)
            aa[i]=aa[i+1]-aa[i]+90;
        aa[--n]=0;
        int ans=solve();
        printf("%d\n",ans);
    }

    return 0;
}