#include <algorithm>
#include <iostream>
#include <vector>
#include <math.h>
#include <set>
#include <map>
#include <string>
#include <stack>
#include <queue>
#include <iomanip>
#include <numeric>
#include <tuple>
#include <bitset>
#include <complex>
#include <unistd.h>
#include <cassert>
#include <cctype>
#include <random>
#include <time.h>
#define _USE_MATH_DEFINES
#define _GLIBCXX_DEBUG
using namespace std;
typedef long long ll;
typedef pair<int, int> pii;
typedef pair<ll, ll> plglg;
typedef pair<double, ll> pdlg;
typedef tuple<int, int, int> tiii;
typedef tuple<ll, ll, ll> tlglglg;
typedef tuple<double, double, double> tddd;
typedef complex<double> xy_t;
typedef vector<ll> vll;
typedef vector< vector<ll> > matrix;
typedef unsigned int uint;
typedef unsigned long long ull;
template <class T> using V = vector<T>;
template <class T> using VV = V<V<T>>;
template <class T> using VVV = V<VV<T>>;
#define REP(i, x, y) for(ll i = (ll)x; i < (ll)y; i++)
#define DREP(i, x, y, d) for(ll i = (ll)x; i < (ll)y; i += (ll)d)
#define PER(i, x, y) for(ll i = (ll)x; i > (ll)y; i--)
#define DPER(i, x, y, d) for(ll i = (ll)x; i > (ll)y; i -= (ll)d)
int dx[4] = {1, 0, -1, 0};
int dy[4] = {0, 1, 0, -1};
double pi = 3.141592653589793;
ll mod = 1000000007;
int intmax = 2147483647;
int intmin = -2147483648;
ll llmax = 9223372036854775807;
ll llmin = -9223372036854775807;
int iinf = intmax / 8;
ll inf = llmax / 8;
double eps = 1e-12;
void yesno(bool ok, string yes = "Yes", string no = "No") {
    if (ok) {
        cout << yes << endl;
    } else {
        cout << no << endl;
    }
}

template <uint MD> struct ModInt {
    using M = ModInt;
    const static M G;
    uint v;
    ModInt(ll _v = 0) { set_v(uint(_v % MD + MD)); }
    M& set_v(uint _v) {
        v = (_v < MD) ? _v : _v - MD;
        return *this;
    }
    explicit operator bool() const { return v != 0; }
    M operator-() const { return M() - *this; }
    M operator+(const M& r) const { return M().set_v(v + r.v); }
    M operator-(const M& r) const { return M().set_v(v + MD - r.v); }
    M operator*(const M& r) const { return M().set_v(uint(ull(v) * r.v % MD)); }
    M operator/(const M& r) const { return *this * r.inv(); }
    M& operator+=(const M& r) { return *this = *this + r; }
    M& operator-=(const M& r) { return *this = *this - r; }
    M& operator*=(const M& r) { return *this = *this * r; }
    M& operator/=(const M& r) { return *this = *this / r; }
    bool operator==(const M& r) const { return v == r.v; }
    M pow(ll n) const {
        M x = *this, r = 1;
        while (n) {
            if (n & 1) r *= x;
            x *= x;
            n >>= 1;
        }
        return r;
    }
    M inv() const { return pow(MD - 2); }
    friend ostream& operator<<(ostream& os, const M& r) { return os << r.v; }
};
using Mint = ModInt<998244353>;

vector<Mint> frac;
vector<Mint> invfrac;

void fracinvfrac(ll n) {
    frac = vector<Mint>(n + 1);
    invfrac = vector<Mint>(n + 1);
    frac[0] = 1;
    for (int i = 1; i <= n; i++) {
        frac[i] = frac[i - 1] * i;
    }
    invfrac[n] = (Mint)1 / frac[n];
    for (int i = n - 1; i >= 0; i--) {
        invfrac[i] = invfrac[i + 1] * (i + 1);
    }
}

ll bo[300010];

int main() {
    cin.tie(0);
    ios::sync_with_stdio(false);
    ll N;
    cin >> N;
    string S;
    cin >> S;
    map<char, ll> mp;
    mp['R'] = 0;
    mp['G'] = 1;
    mp['B'] = 2;
    vll nums(3, 0);
    ll fir = -1;
    ll sec = -1;
    REP(i, 0, 3 * N) {
        char c = S[i];
        ll mk = mp[c];
        nums[mk]++;
        if (fir == -1 || sec == -1) {
            if (fir == -1) {
                if (sec == -1) {
                    fir = mk;
                    bo[i] = 0;
                } else if (sec == mk) {
                    bo[i] = 0;
                } else {
                    fir = mk;
                    bo[i] = 1;
                }
            } else {
                if (fir == mk) {
                    bo[i] = 0;
                } else {
                    sec = mk;
                    bo[i] = 1;
                }
            }
        } else {
            if (fir == mk) {
                if (nums[fir] > nums[sec]) {
                    bo[i] = 0;
                } else {
                    bo[i] = 1;
                }
            } else if (sec == mk) {
                if (nums[sec] > nums[fir]) {
                    bo[i] = 0;
                } else {
                    bo[i] = 1;
                }
            } else {
                bo[i] = 2;
                REP(i, 0, 3) {
                    nums[i]--;
                }
                if (nums[fir] == 0) {
                    fir = -1;
                }
                if (nums[sec] == 0) {
                    sec = -1;
                }
            }
        }
    }
    // REP(i, 0, 3 * N) {
    //     cout << bo[i] << " ";
    // }
    // cout << endl;
    fracinvfrac(N);
    vll cnt(3, 0);
    Mint ans = 1;
    REP(i, 0, 3 * N) {
        if (bo[i] == 0) {
            cnt[0]++;
        } else if (bo[i] == 1) {
            ans *= cnt[0];
            cnt[0]--;
            cnt[1]++;
        } else {
            ans *= cnt[1];
            cnt[1]--;
        }
    }
    ans *= frac[N];
    cout << ans << endl;
}


Measured memory_bytes: 3860