luogu P5748 集合划分计数(贝尔数)

https://www.luogu.com.cn/problem/P5748

设一个非空集合的指数生成函数为 F ( x ) F(x) F(x),枚举有多少个集合,集合之间是不可区分的
答案的生成函数显然为
G ( x ) = ∑ i = 0 F i ( x ) i ! G(x)=\sum_{i=0}\frac{F^i(x)}{i!} G(x)=i=0i!Fi(x)
这显然就是一个exp
然而 F ( x ) = e x − 1 F(x)=e^x-1 F(x)=ex1
所以答案就是 e x p ( e x − 1 ) exp(e^x-1) exp(ex1)
大力冲即可
code:

#include<bits/stdc++.h>
#define int long long
#define mod 998244353
#define G 3
#define N 800005
using namespace std;
int qpow(int x, int y){
    int ret = 1;
    for(; y; y >>= 1, x = x * x % mod) if(y & 1) ret = ret * x % mod;
    return ret;
}
int rev[N], G_inv, len_inv;
void ntt(int *a, int len, int o){
    len_inv = qpow(len, mod - 2);
    for(int i = 0; i <= len; i ++) rev[i] = (rev[i >> 1] >> 1) | ((i&1) * len >> 1);
    for(int i = 0; i <= len; i ++) if(i < rev[i]) swap(a[i], a[rev[i]]);
    for(int i = 2; i <= len; i <<= 1){
        int wn = qpow((o == 1)? G:G_inv, (mod - 1) / i);
        for(int j = 0, p = i / 2; j + i - 1 <= len; j += i){
            int w0 = 1;
            for(int k = j; k < j + p; k ++, w0 = w0 * wn % mod){
                int X = a[k], Y = w0 * a[k + p] % mod;
                a[k] = (X + Y) % mod;
                a[k + p] = (X - Y + mod) % mod;
            }
        }
    }
    if(o == -1)
        for(int i = 0; i <= len; i ++) a[i] = a[i] * len_inv % mod;
}
int c[N];
void inv(int *a, int *b, int sz){
    if(sz == 0) {b[0] = qpow(a[0], mod - 2); return;}
    inv(a, b, sz / 2);
    int len = 1;
    for(; len <= sz + sz; len <<= 1);
    for(int i = 0; i <= sz; i ++) c[i] = a[i];
    for(int i = sz + 1; i <= len; i ++) c[i] = 0;
    ntt(c, len, 1), ntt(b, len, 1);
    for(int i = 0; i <= len; i ++) b[i] = (b[i] * 2 % mod - b[i] * b[i] % mod * c[i] % mod + mod) % mod;
    ntt(b, len, -1);
    for(int i = sz + 1; i <= len; i ++) b[i] = 0;
}
void qiudao(int *a, int sz) {
    for(int i = 0; i < sz; i ++) a[i] = a[i + 1] * (i + 1) % mod;
    a[sz] = 0;
}
void jifen(int *a, int sz) {
    for(int i = sz; i >= 1; i --) a[i] = a[i - 1] * qpow(i, mod - 2) % mod;
    a[0] = 0;
}
int Ad[N], An[N];
void ln(int *A, int n) {
    for(int i = 0; i <= n; i ++) Ad[i] = A[i];
    qiudao(Ad, n);
    inv(A, An, n);
    int len = 1;
    for(; len <= n + n;) len <<= 1;
    ntt(Ad, len, 1), ntt(An, len, 1);
    for(int i = 0; i <= len; i ++) Ad[i] = Ad[i] * An[i] % mod;
    ntt(Ad, len, -1);
    jifen(Ad, n);
    for(int i = 0; i <= n; i ++) A[i] = Ad[i];
    for(int i = 0; i <= len; i ++) An[i] = Ad[i] = 0;
}
int fln[N];
void exp(int *a, int *b, int n) {
    if(n == 0) {b[0] = 1; return;}
    exp(a, b, n / 2);
    for(int i = 0; i <= n; i ++) fln[i] = b[i]; ln(fln, n);
    fln[0] = 1;
    for(int i = 1; i <= n; i ++) fln[i] = (a[i] - fln[i] + mod ) % mod;
    int len = 1;
    for(; len <= n + n;) len <<= 1;
    ntt(b, len, 1), ntt(fln, len, 1);
    for(int i = 0; i <= len; i ++) b[i] = b[i] * fln[i] % mod;
    ntt(b, len, -1);
    for(int i = 0; i <= len; i ++) fln[i] = 0;
}
int a[N], b[N], n, m, fac[N], ifac[N], ib[N];
void init(int n) {
    fac[0] = 1;
    for(int i = 1; i <= n; i ++) fac[i] = fac[i - 1] * i % mod;
    ifac[n] = qpow(fac[n], mod - 2);
    for(int i = n - 1; i >= 0; i --) ifac[i] = 1ll * ifac[i + 1] * (i + 1) % mod;
}
signed main(){
    init(N - 10);
    G_inv = qpow(G, mod - 2);
    n = 100000;
    for(int i = 1; i <= n; i ++) a[i] = ifac[i];
    exp(a, b, n);
    int t;
    scanf("%lld", &t);
    while(t --) {
        scanf("%lld", &n);
        printf("%lld\n", b[n] * fac[n] % mod);
    }
    return 0;
}

posted @ 2021-08-23 01:44  lahlah  阅读(37)  评论(0编辑  收藏  举报