【CF809E】Surprise me!（动态规划，虚树，莫比乌斯反演）

【CF809E】Surprise me!（动态规划，虚树，莫比乌斯反演）

题面

洛谷
CodeForces
翻译：
给定一棵\(n\)个节点的树，每个点有一个权值\(a[i]\)，保证\(a[i]\)是一个\(1..n\)的排列。
求\[\frac{1}{n(n-1)}\sum_{i=1}^n\sum_{j=1}^n\varphi(a_i*a_j)·dist(i,j)\]
其中，\(\varphi(x)\)是欧拉函数，\(dist(i,j)\)表示\(i,j\)两个节点在树上的距离。

题解

神题啊。。。
首先来个轻松而有趣的结论
\(\varphi(a*b)=\varphi(a)*\varphi(b)*\frac{d}{\varphi(d)}\)，其中，\(d=gcd(a,b)\)
证明？大力分解质因数就好啦

现在我们来推式子（好久没有推过式子啦）
先不管前面那个东西
\[ \begin{aligned} Ans&=\sum_{i=1}^n\sum_{j=1}^n\varphi(a_i)\varphi(a_j)\frac{gcd(a_i,a_j)}{\varphi(gcd(a_i,a_j)}dist(i,j)\\ &=\sum_{d=1}^n\frac{d}{\varphi(d)}\sum_{i=1}^n\sum_{j=1}^n[gcd(a_i,a_j)=d]\varphi(a_i)\varphi(a_j)dist(i,j)\\ \end{aligned} \]

这样的东西很舒服啊

设\[g(d)=\sum_{i=1}^n\sum_{j=1}^n[gcd(a_i,a_j)=d]\varphi(a_i)\varphi(a_j)dist(i,j)\]

设\[f(d)=\sum_{i=1}^n\sum_{j=1}^n[d|gcd(a_i,a_j)]\varphi(a_i)\varphi(a_j)dist(i,j)\]

然后莫比乌斯反演就可以用啦

\[g(d)=\sum_{d|i}\mu(\frac{i}{d})f(i)\]

现在只需要求解\(f(i)\)

接着推式子
\[ \begin{aligned}Ans&=\sum_{d=1}^n\frac{d}{\varphi(d)}g(d)\\ &=\sum_{d=1}^n\frac{d}{\varphi(d)}\sum_{d|i}\mu(\frac{i}{d})f(i)\\ f(d)&=\sum_{i=1}^n\sum_{j=1}^n[d|gcd(a_i,a_j)]\varphi(a_i)\varphi(a_j)dist(i,j)\\ &=\sum_{i=1}^n\sum_{j=1}^n[d|gcd(a_i,a_j)]\varphi(a_i)\varphi(a_j)(dep_i+dep_j-2*dep_{lca}) \end{aligned} \]
我们发现，对于\(d|gcd(a_i,a_j)\)的所有\(i,j\)

相当于满足\(a_i,a_j\)是\(d\)的倍数

扫描二维码关注公众号，回复： 1104869 查看本文章

如果只是求前面的两项只与自身有关的\(dep_i+dep_j\)，

这个问题就非常好解。

但是现在多了一个\(dep_{lca}\) 。

因此我们需要做\(dp\)。

把所有\(d|a_i\)的点全部拿下来建立虚树，在虚树上\(dp\)就好了。。。

#include<iostream>
#include<cstdio>
#include<cstdlib>
#include<cstring>
#include<cmath>
#include<algorithm>
#include<set>
#include<map>
#include<vector>
#include<queue>
using namespace std;
#define ll long long
#define RG register
#define MAX 222222
#define MOD 1000000007
inline int read()
{
    RG int x=0,t=1;RG char ch=getchar();
    while((ch<'0'||ch>'9')&&ch!='-')ch=getchar();
    if(ch=='-')t=-1,ch=getchar();
    while(ch<='9'&&ch>='0')x=x*10+ch-48,ch=getchar();
    return x*t;
}
int fpow(int a,int b)
{
    int s=1;
    while(b){if(b&1)s=1ll*s*a%MOD;a=1ll*a*a%MOD;b>>=1;}
    return s;
}
struct Line{int v,next;}e[MAX<<1];
int h[MAX],cnt=1;
inline void Add(int u,int v){e[cnt]=(Line){v,h[u]};h[u]=cnt++;}
int a[MAX],b[MAX],n;
int phi[MAX],mu[MAX],pri[MAX],tot;
bool zs[MAX];
void pre(int N)
{
    zs[1]=true;phi[1]=mu[1]=1;
    for(int i=2;i<=N;++i)
    {
        if(!zs[i])pri[++tot]=i,mu[i]=-1,phi[i]=i-1;
        for(int j=1;j<=tot&&i*pri[j]<=N;++j)
        {
            zs[i*pri[j]]=true;
            if(i%pri[j])phi[i*pri[j]]=phi[i]*phi[pri[j]],mu[i*pri[j]]=-mu[i];
            else{mu[i*pri[j]]=0,phi[i*pri[j]]=phi[i]*pri[j];break;}
        }
    }
}
int dfn[MAX],low[MAX],size[MAX],hson[MAX],top[MAX],fa[MAX],tim,dep[MAX];
void dfs1(int u,int ff)
{
    fa[u]=ff;dep[u]=dep[ff]+1;size[u]=1;
    for(int i=h[u];i;i=e[i].next)
    {
        int v=e[i].v;if(v==ff)continue;
        dfs1(v,u);size[u]+=size[v];
        if(size[v]>size[hson[u]])hson[u]=v;
    }
}
void dfs2(int u,int tp)
{
    top[u]=tp;dfn[u]=++tim;
    if(hson[u])dfs2(hson[u],tp);
    for(int i=h[u];i;i=e[i].next)
        if(e[i].v!=fa[u]&&e[i].v!=hson[u])
            dfs2(e[i].v,e[i].v);
    low[u]=tim;
}
int LCA(int u,int v)
{
    while(top[u]^top[v])dep[top[u]]<dep[top[v]]?v=fa[top[v]]:u=fa[top[u]];
    return dep[u]<dep[v]?u:v;
}
bool cmp(int a,int b){return dfn[a]<dfn[b];}
int ans=0,K,p[MAX<<1],S[MAX],f[MAX];
bool vis[MAX];
void Plus(int &x,int y){x+=y;if(x>=MOD)x-=MOD;}
void DP(int u)
{
    f[u]=vis[u]?phi[a[u]]:0;
    Plus(ans,MOD-1ll*f[u]*f[u]%MOD*dep[u]%MOD);
    for(int i=h[u];i;i=e[i].next)
    {
        DP(e[i].v);
        Plus(ans,MOD-2ll*f[u]*f[e[i].v]%MOD*dep[u]%MOD);
        Plus(f[u],f[e[i].v]);
    }
}
int F[MAX],G[MAX];
int main()
{
    n=read();pre(n);
    for(int i=1;i<=n;++i)a[i]=read(),b[a[i]]=i;
    for(int i=1;i<n;++i)
    {
        int u=read(),v=read();
        Add(u,v);Add(v,u);
    }
    dfs1(1,0);dfs2(1,1);
    memset(h,0,sizeof(h));
    for(int T=1;T<=n;++T)
    {
        K=n/T;int s1=0,s2=0;cnt=1;
        for(int i=1;i<=K;++i)p[i]=b[i*T];
        for(int i=1;i<=K;++i)
            Plus(s1,phi[a[p[i]]]),Plus(s2,1ll*dep[p[i]]*phi[a[p[i]]]%MOD);
        for(int i=1;i<=K;++i)vis[p[i]]=true;
        sort(&p[1],&p[K+1],cmp);
        for(int i=K;i>1;--i)p[++K]=LCA(p[i],p[i-1]);
        sort(&p[1],&p[K+1],cmp);K=unique(&p[1],&p[K+1])-p-1;
        for(int i=1,tp=0;i<=K;++i)
        {
            while(tp&&low[S[tp]]<dfn[p[i]])--tp;
            Add(S[tp],p[i]);S[++tp]=p[i];
        }
        DP(p[1]);Plus(ans,ans);
        Plus(ans,2ll*s1*s2%MOD);
        for(int i=1;i<=K;++i)h[p[i]]=0,vis[p[i]]=false;
        F[T]=ans;ans=0;
    }
    for(int i=1;i<=n;++i)
        for(int j=i;j<=n;j+=i)
            if(mu[j/i]!=0)Plus(G[i],(mu[j/i]==1)?F[j]:(MOD-F[j]));
    for(int i=1;i<=n;++i)G[i]=1ll*G[i]*i%MOD*fpow(phi[i],MOD-2)%MOD;
    for(int i=1;i<=n;++i)Plus(ans,G[i]);
    ans=1ll*ans*fpow(n,MOD-2)%MOD*fpow(n-1,MOD-2)%MOD;
    printf("%d\n",ans);
    return 0;
}