#include<bits/stdc++.h>
using namespace std;
const int MOD=998244353,N=1<<13,G=3;
int rev[N],inv[N],fac[N],ifac[N],w[N<<1];
int ksm(int a,int b=MOD-2) {
	int ret=1;
	for(;b;a=1ll*a*a%MOD,b=b>>1) if(b&1) ret=1ll*ret*a%MOD;
	return ret;
}
namespace P {
void poly_init() {
	inv[1]=1;
	for(int i=2;i<N;++i) inv[i]=1ll*(MOD-MOD/i)*inv[MOD%i]%MOD;
	fac[0]=ifac[0]=1;
	for(int i=1;i<N;++i) fac[i]=1ll*fac[i-1]*i%MOD,ifac[i]=1ll*ifac[i-1]*inv[i]%MOD;
	for(int k=1;k<=N;k<<=1) {
		int x=ksm(G,(MOD-1)/k); w[k]=1;
		for(int i=1;i<k;++i) w[i+k]=1ll*x*w[i+k-1]%MOD;
	}
}
int plen(int x) { int y=1; for(;y<x;y<<=1); return y;  }
void ntt(int *f,bool idft,int n) {
	for(int i=0;i<n;++i) {
		rev[i]=(rev[i>>1]>>1);
		if(i&1) rev[i]|=n>>1;
	}
	for(int i=0;i<n;++i) if(rev[i]<i) swap(f[i],f[rev[i]]);
	for(int k=2,x,y;k<=n;k<<=1) {
		for(int i=0;i<n;i+=k) {
			for(int j=i;j<i+k/2;++j) {
				x=f[j],y=1ll*f[j+k/2]*w[k+j-i]%MOD;
				f[j]=(x+y>=MOD)?x+y-MOD:x+y,f[j+k/2]=(x>=y)?x-y:x+MOD-y;
			}
		}
	}
	if(idft) {
		reverse(f+1,f+n);
		for(int i=0,x=ksm(n);i<n;++i) f[i]=1ll*f[i]*x%MOD;
	}
}
}
int C(int x,int y) {
	return 1ll*fac[x]*ifac[y]%MOD*ifac[x-y]%MOD;
}
int n,fb[N],fr[N],f[N][N],g[N],ans[N],c[N];
char str[N];
//ans = B<R-2R<B, fb=BR, fr=RB
void INV(int *a) {
	static int b[N];
	memset(b,0,sizeof(b));
	for(int i=0;i<=n;++i) b[i]=1ll*a[i]*fac[i]%MOD;
	P::ntt(b,0,N);
	for(int i=0;i<N;++i) b[i]=1ll*b[i]*c[i]%MOD;
	P::ntt(b,1,N);
	for(int i=0;i<=n;++i) a[i]=1ll*b[i+n]*ifac[i]%MOD;
}
signed main() {
	P::poly_init();
	scanf("%d%s",&n,str+1);
	fb[0]=fr[0]=1;
	for(int i=1,cb=0,cr=0;i<=n;++i) {
		if(str[i]=='R') {
			for(int j=cb;j;--j) fb[j]=(fb[j]+1ll*fb[j-1]*(cb+1-j))%MOD;
			++cr;
		} else {
			for(int j=cr;j;--j) fr[j]=(fr[j]+1ll*fr[j-1]*(cr+1-j))%MOD;
			++cb;
		}
	}
	for(int i=0;i<=n;++i) c[n-i]=(i&1?MOD-ifac[i]:ifac[i]);
	P::ntt(c,0,N);
	for(int x=0;x<=n;++x) for(int y=0;x+y<n;++y) f[x][y]=(f[x][y]+1ll*fb[x]*fr[y]%MOD*fac[n-1-x-y])%MOD;
	for(int x=0;x<=n;++x) INV(f[x]);
	for(int y=0;y<=n;++y) {
		memset(g,0,sizeof(g));
		for(int x=0;x<=n;++x) g[x]=f[x][y];
		INV(g);
		for(int x=0;x<=n;++x) ans[x+n-2*y]=(ans[x+n-2*y]+g[x])%MOD;
	}
	for(int i=0;i<=2*n;++i) printf("%d ",ans[i]); puts("");
	return 0;
}