#include <iostream>
#include <set>
#include <vector>

using namespace std;
set<int> l,r;
int a[200010],b[200010];
int main(){
    int i,n; cin >> n;
    for(i=0;i<n;i++) cin >> a[i];
    for(i=0;i<n;i++) cin >> b[i];
    for(i=0;i<n;i++){
        if(a[i]==b[i]) continue;
        if(a[i]<b[i]) r.insert(i);
        else l.insert(i);
    }
    vector<pair<int,char>> ans;
    while(l.size() || r.size()){
        if(l.size()){
            int x = (*l.begin());
            for(i=0;i<a[x] - b[x];i++) ans.push_back({x,'L'});
            l.erase(x);
        }else{
            int x = (*r.rbegin());
            for(i=0;i<b[x] - a[x];i++) ans.push_back({x,'R'});
            r.erase(x);
        }
    }
    cout << ans.size() << endl;
    for(auto p:ans) cout << p.first + 1<< " " << p.second << endl;
}