import std.stdio;
import std.conv;
import std.string;
import std.typecons;
import std.algorithm;
import std.array;
import std.range;
import std.math;
import std.regex : regex;
import std.container;

void main()
{
  auto n = readln.chomp.to!int;
  auto s = readln.chomp.array.map!(a=>a == 'R' ? 4 : a == 'G' ? 2 : 1).array;
  long cnt;

  foreach (int i; 0..n-2) {
    foreach (int j; i+1..n-1) {
      if (s[i] == s[j]) continue;
      auto jji = 2 * j - i;
      auto t = 7 - s[i] - s[j];
      foreach (int k; j+1..min(jji, n)) {
        if (s[k] == t) {
          cnt++;
        }
      }
      foreach (int k; jji+1..n) {
        if (s[k] == t) {
          cnt++;
        }
      }
      
    }
  }
  cnt.writeln;
}
