/* -*- coding: utf-8 -*-
 *
 * 1927.cc:  No.1927 AB-CD - yukicoder
 */

#include<cstdio>
#include<algorithm>
 
using namespace std;

/* constant */

const int MAX_N = 300000;
const int MOD = 998244353;

/* typedef */

template<const int MOD>
struct MI {
  int v;
  MI(): v() {}
  MI(int _v): v(_v % MOD) {}
  MI(long long _v): v(_v % MOD) {}

  MI operator+(const MI m) const { return MI(v + m.v); }
  MI operator-(const MI m) const { return MI(v + MOD - m.v); }
  MI operator*(const MI m) const { return MI((long long)v * m.v); }

  MI &operator+=(const MI m) { return (*this = *this + m); }
  MI &operator-=(const MI m) { return (*this = *this - m); }
  MI &operator*=(const MI m) { return (*this = *this * m); }

  MI pow(int n) const {  // a^n % MOD
    MI pm = 1, a = *this;
    while (n > 0) {
      if (n & 1) pm *= a;
      a *= a;
      n >>= 1;
    }
    return pm;
  }

  MI inv() const { return pow(MOD - 2); }
  MI operator/(const MI m) const { return *this * m.inv(); }
  MI &operator/=(const MI m) { return (*this = *this / m); }
};

typedef MI<MOD> mi;

/* global variables */

char s[MAX_N + 4];
mi fs[MAX_N + 1], invfs[MAX_N + 1];

/* subroutines */

inline mi nck(int n, int k) {  // nCk % MOD
  if (n < k || k < 0) return 0;
  return fs[n] * invfs[n - k] * invfs[k];
}

inline mi nhk(int n, int k) {  // nHk % MOD
  return nck(n + k - 1, k);
}

void prepare_fracs(int n) {
  fs[0] = invfs[0] = 1;
  for (int i = 1; i <= n; i++) {
    fs[i] = fs[i - 1] * i;
    invfs[i] = fs[i].inv();
  }
}

/* main */

int main() {
  int n;
  scanf("%d%s", &n, s);

  int m = 0, k = 0;
  for (int i = 0; i < n; i++) {
    if (s[i] <= 'B') m++;
    else k++;
  }
  //printf("%d %d\n", m, k);

  prepare_fracs(n);
  mi x = nck(n, k);

  printf("%d\n", x.v);
  return 0;
}