#include "bits/stdc++.h"

// Begin Header {{{
using namespace std;

#ifndef DEBUG
#define dump(...)
#endif

#define all(x) x.begin(), x.end()
#define rep(i, b, e) for (intmax_t i = (b), i##_limit = (e); i < i##_limit; ++i)
#define reps(i, b, e) for (intmax_t i = (b), i##_limit = (e); i <= i##_limit; ++i)
#define repr(i, b, e) for (intmax_t i = (b), i##_limit = (e); i >= i##_limit; --i)
#define var(Type, ...) Type __VA_ARGS__; input(__VA_ARGS__)

constexpr size_t    operator""_zu(unsigned long long value) { return value; };
constexpr intmax_t  operator""_jd(unsigned long long value) { return value; };
constexpr uintmax_t operator""_ju(unsigned long long value) { return value; };

constexpr int INF = 0x3f3f3f3f;
constexpr intmax_t LINF = 0x3f3f3f3f3f3f3f3f_jd;

template <class T, class Compare = less<>>
using MaxHeap = priority_queue<T, vector<T>, Compare>;
template <class T, class Compare = greater<>>
using MinHeap = priority_queue<T, vector<T>, Compare>;

inline void input() {}
template <class Head, class... Tail>
inline void input(Head&& head, Tail&&... tail) {
    cin >> head;
    input(forward<Tail>(tail)...);
}

template <class T>
inline istream& operator>>(istream &is, vector<T> &vec) {
    for (auto &e: vec) {
        is >> e;
    }
    return is;
}

inline void output() { cout << "\n"; }
template <class Head, class... Tail>
inline void output(Head&& head, Tail&&... tail) {
    cout << head;
    if (sizeof...(tail)) {
        cout << " ";
    }
    output(forward<Tail>(tail)...);
}

template <class T>
inline ostream& operator<<(ostream &os, const vector<T> &vec) {
    static constexpr const char *delim[] = {" ", ""};
    for (const auto &e: vec) {
        os << e << delim[&e == &vec.back()];
    }
    return os;
}

template <class T>
inline vector<T> makeVector(const T &initValue, size_t sz) {
    return vector<T>(sz, initValue);
}

template <class T, class... Args>
inline auto makeVector(const T &initValue, size_t sz, Args... args) {
    return vector<decltype(makeVector<T>(initValue, args...))>(sz, makeVector<T>(initValue, args...));
}

template <class Func>
class FixPoint : Func {
public:
    explicit constexpr FixPoint(Func&& f) noexcept : Func(forward<Func>(f)) {}

    template <class... Args>
    constexpr decltype(auto) operator()(Args&&... args) const {
        return Func::operator()(*this, std::forward<Args>(args)...);
    }
};

template <class Func>
static inline constexpr decltype(auto) makeFixPoint(Func&& f) noexcept {
    return FixPoint<Func>{forward<Func>(f)};
}

template <class Container>
struct reverse_t {
    Container &c;
    reverse_t(Container &c) : c(c) {}
    auto begin() { return c.rbegin(); }
    auto end() { return c.rend(); }
};

template <class Container>
auto reversed(Container &c) {
    return reverse_t<Container>(c);
}

template <class T>
inline bool chmax(T &a, const T &b) noexcept {
    return b > a && (a = b, true);
}

template <class T>
inline bool chmin(T &a, const T &b) noexcept {
    return b < a && (a = b, true);
}

template <class T>
inline T diff(const T &a, const T &b) noexcept {
    return a < b ? b - a : a - b;
}
// End Header }}}

signed main() {
    ios_base::sync_with_stdio(false);
    cin.tie(nullptr);
    cout.setf(ios_base::fixed);
    cout.precision(10);
    var(size_t, N);
    var(string, S);
    vector<intmax_t> cumR(N + 1), cumG(N + 1), cumB(N + 1);
    rep(i, 0, N) {
        cumR[i + 1] = cumR[i] + (S[i] == 'R');
        cumG[i + 1] = cumG[i] + (S[i] == 'G');
        cumB[i + 1] = cumB[i] + (S[i] == 'B');
    }
    dump(cumR, cumG, cumB);
    intmax_t res = 0;
    const auto f = [&](char c, int i) -> void {
        if (S[i] == 'R') {
            res += (cumG[i + 1] - cumG[0]) * (cumB[N] - cumB[i]);
            res += (cumB[i + 1] - cumB[0]) * (cumG[N] - cumG[i]);
            rep(l, 1, N) {
                int left = i - l;
                int right = i + l;
                if (left >= 0 && right < N) {
                    if ((S[left] == 'G' && S[right] == 'B') ||
                        (S[left] == 'B' && S[right] == 'G')) {
                        res--;
                    }
                }
            }
        } else if (S[i] == 'G') {
            res += (cumR[i + 1] - cumR[0]) * (cumB[N] - cumB[i]);
            res += (cumB[i + 1] - cumB[0]) * (cumR[N] - cumR[i]);
            rep(l, 1, N) {
                int left = i - l;
                int right = i + l;
                if (left >= 0 && right < N) {
                    if ((S[left] == 'R' && S[right] == 'B') ||
                        (S[left] == 'B' && S[right] == 'R')) {
                        res--;
                    }
                }
            }
        } else {
            res += (cumR[i + 1] - cumR[0]) * (cumG[N] - cumG[i]);
            res += (cumG[i + 1] - cumG[0]) * (cumR[N] - cumR[i]);
            rep(l, 1, N) {
                int left = i - l;
                int right = i + l;
                if (left >= 0 && right < N) {
                    if ((S[left] == 'R' && S[right] == 'G') ||
                        (S[left] == 'G' && S[right] == 'R')) {
                        res--;
                    }
                }
            }
        }
    };
    rep(i, 0, N) {
        f(S[i], i);
    }
    output(res);
    return 0;
}


Measured memory_bytes: 3756