#define MD 998244353
ll@N,@K,c=0;string@S;rep(i,N)(S[i-1]&1?K:c)-=S[i]==78;Comb<Mint>f;wt(sum[k,K,-c](f.C(-c,k)));