#include <bits/stdc++.h>

#define rep(i,n) for(int i=0;i<(n);i++)

using namespace std;
using lint=long long;

class Eratosthenes_sieve{
	vector<bool> er;
	vector<int> p;
public:
	Eratosthenes_sieve(int n):er(n+1,true){
		if(n>=0) er[0]=false;
		if(n>=1) er[1]=false;
		for(int i=2;i*i<=n;i++) if(er[i]) for(int j=i*i;j<=n;j+=i) er[j]=false;
		rep(i,n+1) if(er[i]) p.emplace_back(i);
	}

	vector<int> primes()const{ return p; }

	bool is_prime(int a)const{
		assert(a<=(int)er.size()-1);
		return a>=0 && er[a];
	}
};

int main(){
	int n; scanf("%d",&n);

	Eratosthenes_sieve ES(3*n);
	auto P=ES.primes();

	lint ans=0;
	vector<int> cnt(3*n+1);
	rep(k,P.size()){
		if(P[k]>n) break;
		for(int l=k+1;l<P.size();l++) ans+=cnt[P[l]-P[k]];

		int j=k;
		rep(i,j) cnt[P[i]+P[j]]++;
	}
	printf("%lld\n",ans);

	return 0;
}