#include <bits/stdc++.h>
using namespace std;
using ll = long long;
#ifdef tabr
#include "library/debug.cpp"
#else
#define debug(...)
#endif

template <ll mod>
struct modular {
    ll value;
    modular(ll x = 0) {
        value = x % mod;
        if (value < 0) value += mod;
    }
    modular& operator+=(modular other) {
        if ((value += other.value) >= mod) value -= mod;
        return *this;
    }
    modular& operator-=(modular other) {
        if ((value -= other.value) < 0) value += mod;
        return *this;
    }
    modular& operator*=(modular other) {
        value = value * other.value % mod;
        return *this;
    }
    modular& operator/=(modular other) {
        ll a = 0, b = 1, c = other.value, m = mod;
        while (c != 0) {
            ll t = m / c;
            m -= t * c;
            swap(c, m);
            a -= t * b;
            swap(a, b);
        }
        a %= mod;
        if (a < 0) a += mod;
        value = value * a % mod;
        return *this;
    }
    modular& operator^=(modular other) {
        ll r = 1, x = value, n = other.value;
        while (n > 0) {
            if (n & 1) r = r * x % mod;
            x = x * x % mod;
            n >>= 1;
        }
        value = r;
        return *this;
    }
    modular operator+(modular rhs) {
        return modular(*this) += rhs;
    }
    modular operator-(modular rhs) {
        return modular(*this) -= rhs;
    }
    modular operator*(modular rhs) {
        return modular(*this) *= rhs;
    }
    modular operator/(modular rhs) {
        return modular(*this) /= rhs;
    }
    modular operator^(modular rhs) {
        return modular(*this) ^= rhs;
    }
    bool operator==(modular rhs) {
        return value == rhs.value;
    };
    bool operator!=(modular rhs) {
        return value != rhs.value;
    };
    bool operator<(modular rhs) {
        return value < rhs.value;
    }
};
template <ll mod>
string to_string(modular<mod> x) {
    return to_string(x.value);
}
template <ll mod>
ostream& operator<<(ostream& stream, modular<mod> x) {
    x.value %= mod;
    if (x.value < 0) x.value += mod;
    return stream << x.value;
}
template <ll mod>
istream& operator>>(istream& stream, modular<mod>& x) {
    stream >> x.value;
    x.value %= mod;
    if (x.value < 0) x.value += mod;
    return stream;
}
const ll mod = 998244353;
using mint = modular<mod>;

vector<mint> fac, finv;
inline void cinit(int n) {
    fac.resize(n, 1);
    finv.resize(n, 1);
    for (int i = 2; i < n; i++) {
        fac[i] = fac[i - 1] * i;
        finv[i] = finv[i - 1] / i;
    }
}
inline mint C(int n, int k) {
    if (n < k || k < 0 || n < 0) return 0;
    return fac[n] * finv[k] * finv[n - k];
}
inline mint H(int n, int k) {
    return C(n + k - 1, k);
}

int main() {
    ios::sync_with_stdio(false);
    cin.tie(0);
    int n;
    string s;
    cin >> n >> s;
    vector<vector<int>> a(3);  // r, g, b
    for (int i = 0; i < 3 * n; i++) {
        int t = (s[i] == 'R' ? 0 : (s[i] == 'G' ? 1 : 2));
        a[t].emplace_back(i);
    }
    vector<vector<pair<int, int>>> z(6);
    for (int i = 0; i < n; i++) {
        vector<int> tmp = {a[0][i], a[1][i], a[2][i]};
        sort(tmp.begin(), tmp.end());
        int t = (tmp[0] == a[0][i] ? 0 : (tmp[0] == a[1][i] ? 1 : 2));
        z[t].emplace_back(tmp[0], 1);
        z[t].emplace_back(tmp[1], -1);
        t = (tmp[2] == a[0][i] ? 0 : (tmp[2] == a[1][i] ? 1 : 2));
        t += 3;
        z[t].emplace_back(-tmp[2], 1);
        z[t].emplace_back(-tmp[1], -1);
    }
    mint ans = 1;
    for (int i = 0; i < 6; i++) {
        sort(z[i].begin(), z[i].end());
        int cnt = 0;
        for (auto p : z[i]) {
            if (p.second == 1) {
                cnt++;
            } else {
                ans *= cnt;
                cnt--;
            }
        }
    }
    for (int i = 1; i <= n; i++) {
        ans *= i;
    }
    cout << ans << endl;
    return 0;
}

Measured memory_bytes: 6660