#include<fstream>
//#include<iostream>

using namespace std;

long a[20];
int ciur[1000001];

void gen_ciur(long n)
{
	memset(ciur, 0, sizeof(ciur));
	ciur[1]=1;
	for(long i=4;i<=n;i=i+2)
		ciur[i]=1;
	for(long i=3;i<=n;i=i+2)
	{
		int k=i;
		while((k=k+i)<=n)
			ciur[k]=1;
	}
}

long nrelem(long n, long a[20], int m)
{
	long s=0;

	for(long i=1;i<(1<<m);i++)
	{
		long p=1,nr=0, t=i, c;
		for(int j=1;j<=m;j++)
		{
			 c=1 & t;
			 t=t>>1;
			 if(c)
				 p=p*a[j];
			 nr+=c;
		}
		if(nr%2==1)
			s+=n/p;
		else
			s-=n/p;
	}
	return n-s;
}

long fracnum(long x, long n)
{
	long d=2;
	int m=0;
	if(ciur[x]==1)
		while(x>1)
		{
			if(x%d==0)
			{
				a[++m]=d;
				while(x%d==0)
					x/=d;
			}
			d++;
		}
	else
		a[m=1]=x;
	return nrelem(n,a,m);
}

int main()
{
	ifstream f("fractii.in");
	ofstream g("fractii.out");
	long n;
	f>>n;
	gen_ciur(n);
	//cout<<"generat ciur"<<endl;
	long long s=1L;
	for(int i=n;i>=2;i--)
	{
		s+=fracnum(i,i);
		//if(i%10000==0)
			//cout<<i<<endl;
	}
	g<<2*s-1;
	//cout<<2*s-1;
	f.close();
	g.close();
	return 0;
}