#include <iostream>
#include <string>

int n;
std::string s;

int C(int n, int k) {
    if (!k) return 1;
    else return C(n / 3, k / 3) * (n % 3 < k % 3 ? 0 : n % 3 == 2 && k % 3 == 1 ? 2 : 1) % 3;
}

int main() {
    std::ios::sync_with_stdio(false), std::cin.tie(nullptr);
    std::cin >> n >> s;
    int ans = 0;
    for (int i = 0, x; i < n; ++i) {
        if (s[i] == 'B') x = 0;
        else if (s[i] == 'W') x = 1;
        else x = 2;
        ans = (ans + C(n - 1, i) * x % 3) % 3;
    }
    if (n % 2 == 0) ans = (3 - ans) % 3;
    if (ans == 0) std::cout << "B\n";
    else if (ans == 1) std::cout << "W\n";
    else std::cout << "R\n";
    return 0;
}

#include <bits/stdc++.h>
//#include <atcoder/all>
using namespace std;
//using namespace atcoder;
//using mint = modint1000000007;
#define rep(i, n) for (int i = 0; i < (int)(n); i++)
#define reps(i,n) for(int i=1;i<=(int)(n);i++)
#define all(x) (x).begin(),(x).end()
#define rall(x) (x).rbegin(),(x).rend()
using ll = long long;
typedef pair<int, int> P;
#define EPS (1e-12)
const int MOD=1000000007;
// const int vx[]={0,1,0,-1},vy[]={1,0,-1,0};
template<class T>T gcd(T a,T b){return b?gcd(b,a%b):a;}
template<class T>T lcm(T a,T b){return a*b/gcd(a,b);}
template<class T>bool chmax(T &a, const T &b) { if (a<b) { a=b; return 1; } return 0; }
template<class T>bool chmin(T &a, const T &b) { if (b<a) { a=b; return 1; } return 0; }

//前計算　O（ｎ）
long long MAX=400400;
long long fac[1000005], finv[1000005], inv[1000005];
void COMinit() {
    fac[0] = fac[1] = 1;
    finv[0] = finv[1] = 1;
    inv[1] = 1;
    for (int i = 2; i < MAX; i++){
        fac[i] = fac[i - 1] * i % MOD;
        inv[i] = MOD - inv[MOD%i] * (MOD / i) % MOD;
        finv[i] = finv[i - 1] * inv[i] % MOD;
    }
}

// 二項係数計算
long long COM(long long n, long long k){
    if (n < k) return 0;
    if (n < 0 || k < 0) return 0;
    return fac[n] * (finv[k] * finv[n - k] % MOD) % MOD;
}

// 重複順列計算
long long HOM(int x, int y){
    return COM(x+y-1,x-1);
}

long long Lucas(long long n,long long k,int p){
    long long rec=1;
    while(!(n==0&&k==0)){
        rec*=COM(n%3,k%3);
        n/=3;
        k/=3;
    }
    return rec;
}

int main(){
    ios::sync_with_stdio(false);
    cin.tie(nullptr);
    COMinit();
    int n;
    cin>>n;
    vector<int> dat(n);
    rep(i,n){
        char a;
        cin>>a;
        if(a=='B')dat[i]=0;
        else if(a=='W')dat[i]=1;
        else if(a=='R')dat[i]=2;
    }
    ll ans=0;
    rep(i,n){
        // cout<<COM(n-1,i);
        if(n%2==0){
            ans-=(Lucas(n-1,i,3)*dat[i]);
        }
        else{
            ans+=(Lucas(n-1,i,3)*dat[i]);
        }
        // cout<<ans<<" ";
    }
    // cout<<ans<<endl;
    ans=(ans%3+3)%3;
    if(ans==0){
        cout<<'B';
    }
    else if(ans==1){
        cout<<'W';
    }
    else if(ans==2)cout<<'R';
    return 0;
}