#define MD 998244353
Comb<Mint>c;ll@n,@k,d=0;string@s;rep(i,n)s[i]-78||(d+=s[i-1]!=67,--k);wt(sum[i,1,1-k](c.C(d,i)));