#include <bits/stdc++.h>
using namespace std;
#define ll long long
string t;
int a[4005],s[5][4005],u[5];
int main()
{
	int n,ans;
	cin>>n>>t;
	for(int i=1;i<=n;i++)
	{
		if(t[i-1]=='R')a[i]=0;
		if(t[i-1]=='G')a[i]=1;
		if(t[i-1]=='B')a[i]=2;
	}
	for(int i=1;i<=n;i++) 
	{
		for(int j=0;j<3;j++)s[j][i]=s[j][i-1];
		s[a[i]][i]=s[a[i]][i-1]+1;
		s[a[i]][i]=s[a[i]][i-1]+1;
	}
	for(int i=1;i<=n;i++)
	{
		for(int j=i+1;j<=n;j++)
		{
			if(a[i]==a[j])continue;
			memset(u,0,sizeof(u));
			u[a[i]]=1;u[a[j]]=1;
			int x;
			for(int k=0;k<3;k++)
			if(u[k]==0)x=k;
			ans+=s[x][n]-s[x][j];
			if(j-i+j<=n&&a[j-i+j]==x)ans--; 
		}
	}
	cout<<ans;
	return 0; 
}