#include <bits/stdc++.h>
#define For(i,a,b) for(int i=a;i<=b;i++)
#define Rev(i,a,b) for(int i=a;i>=b;i--)
#define Fin(file) freopen(file,"r",stdin)
#define Fout(file) freopen(file,"w",stdout)
using namespace std;
#define int long long
const int N=2e6+5,mod=998244353; typedef long long ll;
int qpow(int x,int y){int res=1;while(y){if(y&1){res=1ll*res*x%mod;}x=1ll*x*x%mod;y>>=1;}return res;}
int cp[N],cpinv[N];
// 0:   0
// 1:   1
// 2:   -1
// 3:   1/2
// 4:  -1/2
// 5:   ↑
// 6:   ↓
// 7:   *
int getid(string s){
    if(s=="LL_RR") return 7; // *

    if(s=="L_LRR") return 5; // ↑
    if(s=="_LLRR") return 0; // 0
    if(s=="LRL_R") return 7; // *
    if(s=="LR_LR") return 0; // 0
    if(s=="_RLLR") return 2; // -1
    if(s=="R_LLR") return 0; // 0
    if(s=="LRRL_") return 1; // 1
    if(s=="LRR_L") return 0; // 0
    if(s=="LRLR_") return 0; // 0
    if(s=="LR_RL") return 4; // -1/2
    if(s=="_RLRL") return 2; // -1
    if(s=="R_LRL") return 0; // 0
    if(s=="RRL_L") return 1; // 1
    if(s=="RR_LL") return 0; // 0

    if(s=="LLR_R") return 6; // ↓
    if(s=="LLRR_") return 0; // 0
    if(s=="L_RLR") return 7; // *
    if(s=="LR_LR") return 0; // 0
    if(s=="LRRL_") return 1; // 1
    if(s=="LRR_L") return 0; // 0
    if(s=="_RLLR") return 2; // -1
    if(s=="R_LLR") return 0; // 0
    if(s=="_LRLR") return 0; // 0
    if(s=="RL_LR") return 3; // 1/2
    if(s=="RLRL_") return 1; // 1
    if(s=="RLR_L") return 0; // 0
    if(s=="R_RLL") return 2; // -1
    if(s=="RR_LL") return 0; // 0

    throw 404;
}
int C(int x,int y) { if(y<0||x<y) return 0; else return 1ll*cp[x]*cpinv[y]%mod*cpinv[x-y]%mod; }
int sum[N*2];
void solve(){
    int n,cnt[8]={0}; cin>>n; For(i,1,n) { string s; int x; cin>>s>>x; cnt[getid(s)]+=x; }
    // For(i,0,7) cout<<cnt[i]<<' ';  cout<<endl;
    int ans[4]={0};
    For(i,-n,n) sum[i+N]=0;  For(i,-cnt[4],cnt[3]) sum[i+N]=(sum[i-1+N]+C(cnt[4]+cnt[3],cnt[4]+i))%mod;
    int zero=0; int pw0=qpow(2,cnt[5]+cnt[6]+cnt[7]);
    For(i,-cnt[2],cnt[1]){
        int u=C(cnt[2]+cnt[1],cnt[2]+i);
        ans[0]=(ans[0]+1ll*(sum[cnt[3]+N]-sum[min(cnt[3],2*(-i))+N]+mod)*pw0%mod*u)%mod;
        ans[1]=(ans[1]+1ll*sum[min(cnt[3],2*(-i)-1)+N]*pw0%mod*u)%mod;
        zero=(zero+1ll*(sum[min(cnt[3],2*(-i))+N]-sum[min(cnt[3],2*(-i)-1)+N]+mod)*u)%mod;
    }
    // cerr<<ans[0]<<' '<<ans[1]<<' '<<zero<<endl;
    For(i,-n,n) sum[i+N]=0;  For(i,-cnt[6],cnt[5]) sum[i+N]=(sum[i-1+N]+C(cnt[5]+cnt[6],cnt[6]+i))%mod;
    if(cnt[7]==0){
        ans[0]=(ans[0]+1ll*zero*(sum[cnt[5]+N]-sum[0+N]+mod))%mod;
        ans[1]=(ans[1]+1ll*zero*(sum[-1+N]+mod))%mod;
        ans[3]=(ans[3]+1ll*zero*(sum[0+N]-sum[-1+N]+mod))%mod;
    }
    else{
        int pw1=qpow(2,cnt[7]),pw2=qpow(2,cnt[7]-1);
        ans[0]=(ans[0]+1ll*zero*(sum[cnt[5]+N]-sum[min(cnt[5],1ll)+N]+mod)%mod*pw1)%mod;
        ans[1]=(ans[1]+1ll*zero*sum[-2+N]%mod*pw1)%mod;
        ans[0]=(ans[0]+1ll*zero*(sum[min(cnt[5],1ll)+N]-sum[0+N]+mod)%mod*pw2)%mod;
        ans[1]=(ans[1]+1ll*zero*(sum[-1+N]-sum[-2+N]+mod)%mod*pw2)%mod;
        ans[3]=(ans[3]+1ll*zero*(sum[min(cnt[5],1ll)+N]-sum[-2+N]+mod)%mod*pw2)%mod;
        ans[2]=(ans[2]+1ll*zero*(sum[0+N]-sum[-1+N]+mod)%mod*pw2)%mod;
    }
    For(i,0,3) ans[i]=1ll*ans[i]*qpow(2,cnt[0])%mod;
    For(i,0,3) cout<<ans[i]<<' ';  cout<<endl;
}
signed main(){
    cp[0]=1; For(i,1,N-5) cp[i]=1ll*cp[i-1]*i%mod;
    cpinv[N-5]=qpow(cp[N-5],mod-2); Rev(i,N-6,0) cpinv[i]=1ll*cpinv[i+1]*(i+1)%mod;
    int T,Charlie; cin>>Charlie>>T; while(T--) solve();
    cerr<<"Time = "<<clock()<<" ms"<<endl;
    return 0;
}

// START TYPING IF YOU DON'T KNOW WHAT TO DO