#include <bits/stdc++.h>
#define fi first
#define se second
#define rep(i,s,n) for (int i = (s); i < (n); ++i)
#define rrep(i,n,g) for (int i = (n)-1; i >= (g); --i)
#define all(a) a.begin(),a.end()
#define rall(a) a.rbegin(),a.rend()
#define len(x) (int)(x).size()
#define dup(x,y) (((x)+(y)-1)/(y))
#define pb push_back
#define eb emplace_back
#define Field(T) vector<vector<T>>
using namespace std;
using ll = long long;
using ull = unsigned long long;
template<typename T> using pq = priority_queue<T,vector<T>,greater<T>>;
using P = pair<int,int>;
template<class T>bool chmax(T&a,T b){if(a<b){a=b;return 1;}return 0;}
template<class T>bool chmin(T&a,T b){if(b<a){a=b;return 1;}return 0;}

int main() {
  int n;
  cin >> n;
  vector<int> p(n);
  rep(i,0,n) cin >> p[i];
  string ans = "";
  rep(i,0,n*n) {
    int ok = 1;
    rep(i,0,n) {
      if (p[i] != i) ok = 0;
    }
    if (ok) break;
    if (p[0] < p[1]) {
      swap(p[0], p[1]);
      ans += 'S';
    }
    p.eb(p[0]);
    p.erase(p.begin());
    ans += 'R';
    // rep(i,0,n) {
    //   cout << p[i] << " ";
    // }
    // cout << endl;
  }
  cout << ans << endl;
  return 0;
}