#include <bits/stdc++.h>
using namespace std;
#define For(Ti,Ta,Tb) for(auto Ti=(Ta);Ti<=(Tb);++Ti)
#define Dec(Ti,Ta,Tb) for(auto Ti=(Ta);Ti>=(Tb);--Ti)
#define debug(...) fprintf(stderr,__VA_ARGS__)
#define range(Tx) begin(Tx),end(Tx)
using ll=long long;
const int N=1e6+5;
int n,k,sum[N*2],pos[2][N],rk[N*2],len,cnta[N*2],cntb[N*2],mark[N*2],nxt[N*2];
ll cost[N*2],f[N*2],g[N*2];
char s[N*2];
int main(){
	cin.tie(nullptr)->sync_with_stdio(false);
	cin>>n>>k>>(s+1);
	ll ans=0;
	For(i,1,n*2){
		sum[i]=sum[i-1]+(s[i]=='A'?1:-1);
	}
	For(i,1,n*2){
		if(sum[i]<0){
			ans+=(-sum[i]+1)/2;
			sum[i]=(sum[i]%2?1:0);
		}
	}
	for(int i=1,cnt[2]{};i<=n*2;++i){
		s[i]=(sum[i-1]<sum[i]?'A':'B');
		pos[s[i]=='B'][++cnt[s[i]=='B']]=i;
		rk[i]=cnt[s[i]=='B'];
	}
	mark[0]=1;
	for(int i=1,pre=0;i<=n*2;){
		++len;
		int r=i;
		for(;r<=n*2&&s[r]=='B';++r);
		if(r>n*2) break;
		r=pos[1][rk[r]];
		for(;s[r]=='B';--r);
		mark[r]=1;
		nxt[pre]=r;
		pre=r;
		For(j,i,r){
			cnta[j]=cnta[j-1]+(s[j]=='A');
			cntb[j]=cntb[j-1]+(s[j]=='B');
			cost[j]=cost[j-1]+(s[j]=='A')*cntb[j];
		}
		i=r+1;
	}
	fill(f,f+n*2+1,1e18);
	f[0]=0;
	For($,1,k){
		fill(g,g+n*2+1,1e18);
		For(i,1,n*2){
			if(!mark[i]) continue;
			For(j,0,i-1){
				if(mark[j]){
					g[i]=min(g[i],f[j]+cost[i]-cost[nxt[j]]-1LL*cntb[nxt[j]]*(cnta[i]-cnta[nxt[j]]));
				}
			}
		}
		copy(g,g+n*2+1,f);
	}
	int pos=n*2;
	for(;s[pos]=='B';--pos);
	cout<<ans+f[pos]<<'\n';
	return 0;
}