import java.util.ArrayList;
import java.util.Arrays;
import java.util.Scanner;

public class Main {

	public static void main(String[] args) {
		new Main().run();
	}
	
	int MAX=300001;
	boolean[] isPrime=new boolean[MAX];
	ArrayList<Integer> primes=new ArrayList<>();
	{
		Arrays.fill(isPrime, true);
		isPrime[0]=isPrime[1]=false;
		for(int i=2;i<isPrime.length;++i) {
			if(!isPrime[i])continue;
			primes.add(i);
			for(int j=2*i;j<isPrime.length;j+=i)
				isPrime[j]=false;
		}
	}
	
	void run() {
		Scanner sc=new Scanner(System.in);
		int N=sc.nextInt();//5<=N<=1e5
		long[] dp=new long[MAX];
		for(int p:primes) {
			if(p>N)break;
			for(int q:primes) {
				if(q>N)break;
				++dp[p+q];
			}
		}
		long ans=0;
		for(int i=0;i<MAX;++i) {
			if(dp[i]==0)continue;
			for(int p:primes) {
				if(p>N)break;
				if(i%2==1&&p>2)break;
				if(isPrime[i+p])ans+=dp[i];
			}
		}
		//a+b+c が　素数　かつ　a==b==c　は存在しない。
		for(int p:primes) {
			if(p>N)break;
			for(int q:primes) {
				if(q>N)break;
				if(isPrime[p+p+q]) {
					ans-=3;
				}
			}
		}
		if(ans%6!=0)throw new AssertionError();
		System.out.println(ans/6);
	}
	
	void tr(Object...objects) {System.out.println(Arrays.deepToString(objects));}
}