BZOJ 4555 [Tjoi2016&Heoi2016]求和 （多项式求逆）

题目链接：

https://www.lydsy.com/JudgeOnline/problem.php?id=4555

题目大意：

给定 (S(n,m)) 表示第二类斯特林数,定义函数 (f(n)) :

(f(n) = sum_{i=0}^nsum_{j=0}^iS(i,j)*2^j*(j!))

(S(i, j)) 表示第二类斯特林数，递推公式为:

(S(i,j) = S(i-1,j-1) + j*S(i-1,j),(1 leq j leq i-1)).

边界条件为：(S(i, i) = 1(0 <= i), S(i, 0) = 0(1 <= i)).

给定正整数 (n) ，((n≤10^5))，求(f(n))？

前置知识:

考虑将 (n) 个不同的球放入(m)个不同的盒子内，但没有无空盒限制(可以有空盒)的方案数 就是(m^n)。但是不能有空盒就是第二类斯特林数。

第二类斯特林数(S(n,m))的意义是把 (n) 个元素划分成 (m) 个无序的集合的方案，就是把(n)个有特征(不相同)的球放入(m)个没有特征(相同)的盒子的方案数(每一个盒子里面都至少有一个球)的方案数。

题解：

设(g(n) = sum_{i=0}^nS(n,i)*2^i*(i!))，那么我们要求的是这个式子的前缀和。

考虑一下 (g(n))的意义，(g(n))的意义就是把(1)~(n)中不同的数放入若干个不同的集合中，且每一个集合有两种状态的方案数。

所以可以把式子写出这样(注意： 下标从 (1) 开始)：

(g(n)=sumlimits_{i=1}^n 2*{n choose i}*g(n-i))，意思是枚举第一个集合的方案数再乘以剩余集合的方案数。

将上式写出卷积的形式：

(g(n)=n! * sumlimits_{i=1}^n frac{2}{i!}*frac{g(n-i)}{(n-i)!}).

(frac{g(n)}{n!}=sumlimits_{i=1}^n frac{2}{i!}*frac{g(n-i)}{(n-i)!}).

观察一下右表达式。

这不就是指数型生成函数吗。

可以令：(注意：这两个式子的下标不一样。)

(F(x)=sum_{i=0}^infty {g(i)over i! } x^i)

(G(x)=sum_{i=1}^infty {2over i!}x^i)。

那么有下面这个式子：

(G(x)=F(x) * G(x) +1).

注意：这里的 (1) 实际上指的是，由于(G(x))和(F(x))的起始下标不同，选择以 (1) 为下标开始卷积，所以需要舍弃掉 (frac{g(n-0)}{(n-0)!}) 这一项，再补上 (F(0)) 的系数。

最后有：

(G(x)=frac{1}{1-F(x)})。

这个式子显然可以多项式求逆。

然后构造出(F(x))再通过多项式求逆，就可以得到 (G(x)) 的系数，求和可以得到最终答案。

复杂度：(O(nlogn))。

代码：

#include <bits/stdc++.h>
using namespace std;
typedef long long ll;
const int maxn = 1e6 + 10;
const int maxLen = 18, maxm = 1 << maxLen | 1;
const ll maxv = 1e10 + 6; // 1e14, 1e15
const long double pi = acos(-1.0); // double maybe is not enough
ll mod = 998244353, nlim, sp, msk;

// https://www.lydsy.com/JudgeOnline/problem.php?id=4555

ll qpower(ll x, ll p) { // x ^ p % mod
	ll ret = 1;
	while (p) {
		if (p & 1) (ret *= x) %=mod;
		(x *= x) %=mod;
		p >>= 1;
	}
	return ret;
}
struct cp {
  long double r, i;
  cp() {}
  cp(long double r, long double i) : r(r), i(i) {}
  cp operator + (cp const &t) const { return cp(r + t.r, i + t.i); }
  cp operator - (cp const &t) const { return cp(r - t.r, i - t.i); }
  cp operator * (cp const &t) const { return cp(r * t.r - i * t.i, r * t.i + i * t.r); }
  cp conj() const { return cp(r, -i); }
} w[maxm], wInv[maxm];
void init() {
  for(int i = 0, ilim = 1 << maxLen; i < ilim; ++i) {
      int j = i, k = ilim >> 1; // 2 pi / ilim
      for( ; !(j & 1) && !(k & 1); j >>= 1, k >>= 1);
      w[i] = cp((long double)cos(pi / k * j), (long double)sin(pi / k * j));
      wInv[i] = w[i].conj();
  }
  nlim = std::min(maxv / (mod - 1) / (mod - 1), maxn - 1LL);
  for(sp = 1; 1 << (sp << 1) < mod; ++sp);
  msk = (1 << sp) - 1;
}

void FFT(int n, cp a[], int flag) {
  static int bitLen = 0, bitRev[maxm] = {};
  if(n != (1 << bitLen)) {
      for(bitLen = 0; 1 << bitLen < n; ++bitLen);
      for(int i = 1; i < n; ++i)
          bitRev[i] = (bitRev[i >> 1] >> 1) | ((i & 1) << (bitLen - 1));
  }
  for(int i = 0; i < n; i ++) {
    if(i < bitRev[i]) {
      std::swap(a[i], a[bitRev[i]]);
    }
  }
  for(int i = 1, d = 1; d < n; ++i, d <<= 1)
      for(int j = 0; j < n; j += d << 1)
          for(int k = 0; k < d; ++k) {
              cp &AL = a[j + k], &AH = a[j + k + d];
              cp TP = w[k << (maxLen - i)] * AH;
              AH = AL - TP, AL = AL + TP;
          }
  if(flag != -1)
      return;
  std::reverse(a + 1, a + n);
  for(int i = 0; i < n; ++i) {
      a[i].r /= n;
      a[i].i /= n;
  }
}

void polyMul(int a[], int aLen, int b[], int bLen, int c[]) // a 和 b 的卷积 c
{
  // std::cout << "mod = " << mod << '
';
  static cp A[maxm], B[maxm], C[maxm], D[maxm];
  int len, cLen = aLen + bLen - 1; 
  for(len = 1; len < aLen + bLen - 1; len <<= 1);
  if(std::min(aLen, bLen) <= nlim)
  {
      for(int i = 0; i < len; i++) {
          A[i] = cp(i < aLen ? a[i] : 0, i < bLen ? b[i] : 0);
      }
      FFT(len, A, 1);
      cp tr(0, -0.25);
      for(int i = 0, j; i < len; i++) {
        j = (len - i) & (len - 1), B[i] = (A[i] * A[i] - (A[j] * A[j]).conj()) * tr;
      }
      FFT(len, B, -1);
      for(int i = 0; i < cLen; ++i) c[i] = (ll)(B[i].r + 0.5) % mod;
      return;
  } // if min(aLen, bLen) * mod <= maxv
  for(int i = 0; i < len; ++i) {
      A[i] = i < aLen ? cp(a[i] & msk, a[i] >> sp) : cp(0.0, 0.0);
      B[i] = i < bLen ? cp(b[i] & msk, b[i] >> sp) : cp(0.0, 0.0);
  }
  FFT(len, A, 1);
  FFT(len, B, 1);
  cp trL(0.5, 0.0), trH(0.0, -0.5), tr(0.0, 1.0);
  for(int i = 0, j; i < len; i++) {
      j = (len - i) & (len - 1);
      cp AL = (A[i] + A[j].conj()) * trL;
      cp AH = (A[i] - A[j].conj()) * trH;
      cp BL = (B[i] + B[j].conj()) * trL;
      cp BH = (B[i] - B[j].conj()) * trH;
      C[i] = AL * (BL + BH * tr);
      D[i] = AH * (BL + BH * tr);
  }
  FFT(len, C, -1);
  FFT(len, D, -1);
  for(int i = 0; i < cLen; ++i)
  {
      int v11 = (ll)(C[i].r + 0.5) % mod, v12 = (ll)(C[i].i + 0.5) % mod;
      int v21 = (ll)(D[i].r + 0.5) % mod, v22 = (ll)(D[i].i + 0.5) % mod;
      c[i] = (((((ll)v22 << sp) + v12 + v21) << sp) + v11) % mod;
  }
}

int c[maxm], tmp[maxm];
void polyInv(int x[], int y[], int deg) { // 对多项式 x 求逆
  if (deg == 1) {
    y[0] = qpower(x[0], mod - 2);
    return;
  }
  polyInv(x, y, (deg + 1) >> 1);

  copy(x, x + deg, tmp);
  int p = ((deg + 1) >> 1) + deg - 1;
  polyMul(y, (deg + 1) >> 1, tmp, deg, c);

  for (int i = 0; i < p; i += 1) c[i] = (- c[i] + mod) %mod;
  (c[0] += 2) %=mod;

  polyMul(y, (deg + 1) >> 1, c, deg, tmp);
  copy(tmp, tmp + deg, y);
}

int F[maxn],G[maxn];
ll inv[maxn];
ll fac[maxn];
ll ans;
ll n,m;
int main()
{
  init();
  std::cin >> n;
  m = 1;
  while(m <= n) m<<=1;

   fac[0]=1;
   for(ll i = 1;i <= m;i++) {
     fac[i] = fac[i-1] * i % mod;
   }
   inv[0] = inv[1] = 1;
   inv[m] = qpower(fac[m],mod - 2);
   for(ll i = m;i >= 1;--i) {
     inv[i - 1] = inv[i] * i % mod;
   }
   F[0] = 1;
   for(int i = 1;i <= n;i++) {
     F[i] = (-inv[i] + mod) * 2 % mod;
   }

   polyInv(F,G,m); // 得到多项式 G(x)的系数
   ans = 0;
   for(int i = n;i >= 0;--i) { // 求和得到答案
     ans += G[i] * fac[i] % mod;
     ans %= mod;
   }
   std::cout << ans << '
';
   return 0;
}