// orz AFewSuns
#include<bits/stdc++.h>
using namespace std;
const int mod=998244353;
const int N=5e4+5;

int a[N<<1],f[2][N][2][2];
char s[N<<1];
int n;

void inc(int &a,int b){a=a+b>=mod?a+b-mod:a+b;}

signed main() {
    ios::sync_with_stdio(false);
    cin.tie(0),cout.tie(0);

    cin>>n>>(s+1);
    for(int i=1;i<=(n<<1);++i)
        if(s[i]=='?') a[i]=2;
        else if(s[i]=='Y'||s[i]=='R') a[i]=0;
        else a[i]=1;

    for(int e=0;e<2;++e)
        if(e^a[1]^1) f[0][1][e][0]=1;

    for(int i=1;i<n;++i) {
        int cur=i&1;
        memset(f[cur],0,(i+2)*4*sizeof(int));

        for(int e=0;e<2;++e) if(e^a[i<<1|1]^1) 
            for(int v=0;v<2;++v) if(v^a[i<<1]^1)
                inc(f[cur][1][e][0],f[cur^1][1][e][0]),
                inc(f[cur][2][e][v],f[cur^1][1][e^1][0]);

        for(int j=2;j<=i;++j)
            for(int e=0;e<2;++e) if(e^a[i<<1|1]^1) 
                for(int v=0;v<2;++v) if(v^a[i<<1]^1)
                    inc(f[cur][j][e][0],f[cur^1][j][e][0]),
                    inc(f[cur][j][e][1],f[cur^1][j][e][1]),
                    inc(f[cur][j+1][e][v],f[cur^1][j][e^1][v^1]),
                    inc(f[cur][j-1][e][v^1],f[cur^1][j][e^1][v]);

        for(int e=0;e<2;++e)
            inc(f[cur][1][e][0],f[cur][1][e][1]),f[cur][1][e][1]=0;
    }

    int cur=(n-1)&1,ans=0;
    inc(ans,f[cur][1][0][0]),inc(ans,f[cur][1][1][0]);
    if(a[n<<1]==2) ans=2ll*ans%mod;
    if(0^a[n<<1]^1) inc(ans,f[cur][2][0][0]),inc(ans,f[cur][2][1][0]);
    if(1^a[n<<1]^1) inc(ans,f[cur][2][0][1]),inc(ans,f[cur][2][1][1]);

    cout<<ans<<'\n';
    return 0;
}