#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,lim,sum[N*2],pos[2][N],rk[N*2],nxt[N],lst[N];
ll snxt[N],f[N];
char s[N*2];
struct Hull{
	using Point=array<ll,2>;
	Point dq[N];
	int head,tail;
	bool pop(const Point& i,const Point& j,const Point& k){
		return (j[1]-i[1])*(k[0]-j[0])>=(k[1]-j[1])*(j[0]-i[0]);
	}
	void push(const Point& p){
		while(tail-head>1&&pop(dq[tail-2],dq[tail-1],p)){
			--tail;
		}
		dq[tail++]=p;
	}
	ll val(const Point& p,ll x){
		return p[1]-p[0]*x;
	}
	ll query(ll x){
		while(tail-head>1&&val(dq[head],x)>=val(dq[head+1],x)){
			++head;
		}
		return tail-head?val(dq[head],x):1e18;
	}
}hull;
ll g(ll k){// \min_x{f(x)-kx}+ka
	hull.head=hull.tail=0;
	f[1]=0;
	for(int i=2,j=1;i<=n+1;++i){
		for(;j<=lst[i];++j){
			hull.push({j,f[j]+snxt[j-1]});
		}
		f[i]=hull.query(i)+1LL*i*(lst[i]+1)-snxt[lst[i]]-k;
	}
	return f[n+1]+k*lim;
}
int main(){
	cin.tie(nullptr)->sync_with_stdio(false);
	cin>>n>>lim>>(s+1);
	For(i,1,n*2){
		sum[i]=sum[i-1]+(s[i]=='A'?1:-1);
	}
	ll ans=0;
	int len[2]{};
	For(i,1,n*2){
		if(sum[i]<0){
			ans+=(-sum[i]+1)/2;
			sum[i]=(sum[i]%2?1:0);
		}
		s[i]=(sum[i]>sum[i-1]?'A':'B');
		pos[s[i]-'A'][++len[s[i]-'A']]=i;
		rk[i]=len[s[i]-'A'];
	}
	for(int i=1,j=1;i<=n;++i){
		for(;j<=n&&pos[0][j]<=pos[1][i];++j);
		nxt[i]=j;
		lst[j]=max(lst[j],i);
		snxt[i]=snxt[i-1]+nxt[i];
	}
	For(i,1,n+1){
		lst[i]=max(lst[i],lst[i-1]);
	}
	int cnt=0;
	for(int i=1;i<=n;++cnt,i=nxt[i]);
	lim=min(lim,cnt);
	ll l=-1LL*n*n,r=1LL*n*n;
	while(l<r){
		ll mid=(l+r)>>1;
		if(g(mid)<g(mid+1)) l=mid+1;
		else r=mid;
	}
	cout<<g(l)+ans<<'\n';
	return 0;
}