#include<stdio.h>
long n;
long e[1000010];

void ciur()
{
	long i,j;
	for(i=2;i<=n;i++)
		e[i]=i;
	for(i=2;i<=n;i++)
		if(e[i]==i)//i este prim
		{
			for(j=i;j<=n;j+=i)
				e[j]=e[j]/i*(i-1);
		}
}

int main()
{
	freopen("fractii.in","r",stdin);
	freopen("fractii.out","w",stdout);
	scanf("%ld",&n);
	ciur();
	long i;
	long long s=0;
	for(i=2;i<=n;i++)
		s=s+2*e[i];
	printf("%lld\n",s+1);
	return 0;
}