#include <stdio.h>
#include <string.h>
int v[200000];
int prim[10000];

int ciur(int n)
{
	int i,j,p=0;
	for (i=0; i<100005; i++)
		v[i]=1;
	
	for(i=2; i<=n; i++)
	if (v[i])
	{
		prim[p++]=i;
		v[i]=i-1;
		for (j=i+i; j<=n; j+=i)
			v[j]=0;
	}
	return p;
}

int main()
{
	int n,i,j,p;
	int s=0;
	
	FILE *in=fopen("fractii.in","r");
	fscanf(in,"%d",&n);
	fclose(in);
	
	p=ciur(n);

	
	for (i=2; i<n/2+1; i++)
	{
		for (j=0; j<p; j++)
			if (i*prim[j]<=100000)
				if (i%prim[j]==0)
					v[i*prim[j]]=v[i]*prim[j];
				else
					v[i*prim[j]]=v[i]*(prim[j]-1);
			else
				j=p;
	}
	
	for (i=2; i<=n; i++)
		s+=v[i];
	s*=2;
	s++;
	
	FILE *out=fopen("fractii.out","w");
	fprintf(out,"%d\n",s);
	fclose(out);
	
	return 0;
}