#include <fstream.h>

long int cmmdc(long int a, long int b)
{ long int r;

	do
	{
		r=a%b;
		a=b;
		b=r;

	}while(r!=0);

	return a;
}

int main(void)
{ long int a[10000],a1[10000];
	long int i,j,n,p,count=0,c=0;

	//n=1000000;
	count=n+n-1+2*(n-2);

	ifstream fin("fractii.in");
	ofstream fout("fractii.out");

	for(i=0;i<=n;i++)
	 {a[i]=a1[i]=1;
	 }

	a[0]=a[1]=a1[0]=a1[1]=0;

	for(i=2;i<n;i++)
	 if(a[i]!=0)
		for(p=2*i;p<=n;p=p+i)
		 {a[p]=0;
			a1[p]=0;
		 }

	for(i=2;i<=n;i++)
	 for(j=2;j<i-1;j++)
		if(a[i]!=0) {c=c+i-3; break;}
		 /*else
			if(a1[j]==0)
			 {if(cmmdc(i,j)==1) c++;
			 }
				else */

			 else
				if(i%j!=0)
				 if(cmmdc(i,j)==1) c++;


	count=count+2*c;

	fin.close();
	fout.close();
	return 0;
}