【XSY2730】Ball 多项式exp 多项式ln 多项式开根 常系数线性递推 DP

题目大意

　　一行有\(n\)个球，现在将这些球分成\(k\) 组，每组可以有一个球或相邻两个球。一个球只能在至多一个组中（可以不在任何组中）。求对于\(1\leq k\leq m\)的所有\(k\)分别有多少种分组方法。

　　答案对\(998244353\)取模。

　　\(n\leq {10}^9,m<2^{19}\)

题解

　　因为\(k>n\)的项都是\(0\)，所以我们钦定\(m\leq n\)

　　考虑DP。

　　记\(f_{i,j}\)为前\(i\)个球分为\(j\)组的方案数。

\[f_{i,j}=f_{i-1,j}+f_{i-1,j-1}+f_{i-2,j-1}
\]

　　直接做是\(O(nm)\)的。

　　如果把\(f_i\)看成一个多项式，即

\[F_i(x)=\sum_{j\geq 0}f_{i,j}x^j
\]

　　那么转移就变成了

\[F_i(x)=(1+x)F_{i-1}(x)+xF_{i-2}(x)
\]

　　这是一个常系数齐次线性递推，用FFT优化可以做到\(O(m\log m\log n)\)

　　考虑怎么求一个常系数齐次线性递推关系的通项公式。

　　先求出这个转移矩阵的特征多项式：

\[\lambda^2-(1+x)\lambda-x
\]

　　特征值为

\[\begin{align}
\lambda_1&=\frac{1+x+\sqrt{x^2+6x+1}}{2}\\
\lambda_2&=\frac{1+x-\sqrt{x^2+6x+1}}{2}
\end{align}
\]

　　我们钦定\(F_{-1}(x)=0\)，设

\[F_i(x)=c_1{\lambda_1}^{i+1}+c_2{\lambda_2}^{i+1}
\]

　　带入\(F_{-1}(x),F_0(x)\)得

\[\begin{cases}
c_1&+c2&=0\\
c_2\lambda_1&+c_2\lambda_2&=1
\end{cases}
\]

　　解得

\[\begin{cases}
c_1&=\frac{1}{\lambda_1-\lambda_2}\\
c_2&=\frac{1}{\lambda_2-\lambda_1}
\end{cases}
\]

　　于是

\[F_i(x)=\frac{{\lambda_1}^{i+1}-{\lambda_2}^{i+1}}{\lambda_1-\lambda_2}
\]

　　直接用多项式开根求出\(\lambda_1,\lambda_2\)，然后用多项式\(\ln \exp\)求出\(F_n(x)\)

　　时间复杂度：\(O(m\log m)\)

　　小优化：因为\([x^0]\lambda_2=0\)，所以\(\lambda_2\)的前\(n+1\)项都是\(0\)。因为\(m\leq n\)，所以

\[{\lambda_2}^{n+1}\equiv 0 \pmod {x^{m+1}}
\]

　　所以我们不用计算\({\lambda_2}^{n+1}\)了。

代码

#include<cstdio>
#include<cstring>
#include<algorithm>
using namespace std;
typedef long long ll;
const int maxn=300000;
const ll p=998244353;
const ll g=3;
const ll inv2=(p+1)/2;
ll fp(ll a,ll b)
{
	ll s=1;
	for(;b;b>>=1,a=a*a%p)
		if(b&1)
			s=s*a%p;
	return s;
}
int rev[maxn];
ll w1[maxn];
ll w2[maxn];
void ntt(ll *a,int n,int t)
{
	int i,j,k;
	ll u,v,w,wn;
	for(i=1;i<n;i++)
	{
		rev[i]=(rev[i>>1]>>1)|(i&1?n>>1:0);
		if(rev[i]>i)
			swap(a[i],a[rev[i]]);
	}
	for(i=2;i<=n;i<<=1)
	{
		wn=(t==1?w1[i]:w2[i]);
		for(j=0;j<n;j+=i)
		{
			w=1;
			for(k=j;k<j+i/2;k++)
			{
				u=a[k];
				v=a[k+i/2]*w%p;
				a[k]=(u+v)%p;
				a[k+i/2]=(u-v)%p;
				w=w*wn%p;
			}
		}
	}
	if(t==-1)
	{
		ll inv=fp(n,p-2);
		for(i=0;i<n;i++)
			a[i]=a[i]*inv%p;
	}
}
void getinv(ll *a,ll *b,int n)
{
	if(n==1)
	{
		b[0]=fp(a[0],p-2);
		return;
	}
	getinv(a,b,n>>1);
	static ll a1[maxn],a2[maxn];
	int i;
	for(i=0;i<n;i++)
		a1[i]=a[i];
	for(;i<n<<1;i++)
		a1[i]=0;
	for(i=0;i<n>>1;i++)
		a2[i]=b[i];
	for(;i<n<<1;i++)
		a2[i]=0;
	ntt(a1,n<<1,1);
	ntt(a2,n<<1,1);
	for(i=0;i<n<<1;i++)
		a1[i]=a2[i]*((2-a1[i]*a2[i])%p)%p;
	ntt(a1,n<<1,-1);
	for(i=0;i<n;i++)
		b[i]=a1[i];
}
void getsqrt(ll *a,ll *b,int n)
{
	if(n==1)
	{
		b[0]=1;
		return;
	}
	getsqrt(a,b,n>>1);
	static ll a1[maxn],a2[maxn],a3[maxn];
	int i;
	for(i=0;i<n>>1;i++)
		a1[i]=b[i];
	for(;i<n<<1;i++)
		a1[i]=0;
	for(i=0;i<n;i++)
		a2[i]=a[i];
	for(;i<n<<1;i++)
		a2[i]=0;
	getinv(a1,a3,n);
	ntt(a2,n<<1,1);
	ntt(a3,n<<1,1);
	for(i=0;i<n<<1;i++)
		a2[i]=a2[i]*a3[i]%p;
	ntt(a2,n<<1,-1);
	for(i=0;i<n;i++)
		b[i]=(a1[i]+a2[i])%p*inv2%p;
}
void getln(ll *a,ll *b,int n)
{
	static ll inv[maxn],a1[maxn],a2[maxn];
	int i;
	inv[0]=inv[1]=1;
	for(i=2;i<n;i++)
		inv[i]=-p/i*inv[p%i]%p;
	for(i=1;i<n;i++)
		a1[i-1]=a[i]*i%p;
	a1[n-1]=0;
	getinv(a,a2,n);
	for(i=n;i<n<<1;i++)
		a1[i]=a2[i]=0;
	ntt(a1,n<<1,1);
	ntt(a2,n<<1,1);
	for(i=0;i<n<<1;i++)
		a1[i]=a1[i]*a2[i]%p;
	ntt(a1,n<<1,-1);
	for(i=1;i<n;i++)
		b[i]=a1[i-1]*inv[i]%p;
	b[0]=0;
}
void getexp(ll *a,ll *b,int n)
{
	if(n==1)
	{
		b[0]=1;
		return;
	}
	getexp(a,b,n>>1);
	int i;
	for(i=n>>1;i<n;i++)
		b[i]=0;
	static ll a1[maxn],a2[maxn],a3[maxn];
	getln(b,a1,n);
	for(i=0;i<n>>1;i++)
	{
		a2[i]=b[i];
		a3[i]=a[i+(n>>1)]-a1[i+(n>>1)];
	}
	for(;i<n;i++)
		a2[i]=a3[i]=0;
	ntt(a2,n,1);
	ntt(a3,n,1);
	for(i=0;i<n;i++)
		a2[i]=a2[i]*a3[i]%p;
	ntt(a2,n,-1);
	for(i=0;i<n>>1;i++)
		b[i+(n>>1)]=a2[i];
}
ll a[maxn];
ll b[maxn];
ll c[maxn];
ll d[maxn];
ll e[maxn];
int n,m;
int k;
void solve()
{
	k=1;
	while(k<=m)
		k<<=1;
	int i;
	for(i=2;i<=k<<1;i++)
	{
		w1[i]=fp(g,(p-1)/i);
		w2[i]=fp(w1[i],p-2);
	}
	d[0]=1;
	d[1]=6;
	d[2]=1;
	getsqrt(d,c,k);
	for(i=0;i<k;i++)
		a[i]=c[i];
	a[0]++;
	a[1]++;
	for(i=0;i<k;i++)
		a[i]=a[i]*inv2%p;
	getinv(c,b,k);
	getln(a,e,k);
	for(i=0;i<k;i++)
		e[i]=e[i]*(n+1)%p;
	getexp(e,a,k);
	for(i=k;i<k<<1;i++)
		a[i]=b[i]=0;
	ntt(a,k<<1,1);
	ntt(b,k<<1,1);
	for(i=0;i<k<<1;i++)
		a[i]=a[i]*b[i]%p;
	ntt(a,k<<1,-1);
	for(i=1;i<=m;i++)
	{
		a[i]=(a[i]+p)%p;
		printf("%lld ",a[i]);
	}
}
int main()
{
#ifndef ONLINE_JUDGE
	freopen("b.in","r",stdin);
	freopen("b.out","w",stdout);
#endif
	int x=0;
	scanf("%d%d",&n,&m);
	if(m>n)
	{
		x=m-n;
		m=n;
	}
	solve();
	while(x--)
		printf("0 ");
	return 0;
}