/*
TASK:chai
LANG:C++
*/
#include <iostream.h>
#include <stdlib.h>

using namespace std;
int main()
{int m,n;
cin>>m>>n;
char b;
int a[m+n];
for(int i=0;i<m+n;i++)
{cin>>b;if(b=='L')a[i]=1;
if(b=='R')a[i]=2;
if(b=='P')a[i]=0;
}
int k=0;
int p=0,brl=0,brr=0;
int x[n][2];
int u,q;
int gbr=0;
do
{k=p;for(int i=k;i<n+m;i++)
{if(a[i]==0){p=i;break;}}
if(gbr==0)for(int i=k;i<p;i++)
{if(a[i]==1)brl++;
if(a[i]==2)brr++;}
if(brl>brr){x[gbr][0]=brr;x[gbr][1]=1;brl=brl-brr;gbr++;}
if(brl<brr){x[gbr][0]=brl;x[gbr][1]=2;brr=brr-brl;gbr++;}
if(brl==brr){x[gbr][0]=brl;x[gbr][1]=2;brr=0;}gbr++;
}while(k!=p);brl=0;brr=0;
for(int i=0;i<n+m;i++)
{if(a[i]==1)brl++;
if(a[i]==2)brr++;
}
for(int i=0;i<n;i++)
{cout<<x[i][0]<<" ";
if(a[i]==2){cout<<"R\n";brr=brr-x[i][0];}
if(a[i]==1){cout<<"L\n";brl=brl-x[i][0];}}

cout<<brl<<"\n"<<brr<<endl;





    
 system("PAUSE");
 return 0;
}
