#include <fstream>

using namespace std;
#define LIM 1000003

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

int n,v[LIM];
long long sol;

int euler()
{
    for(int i=1;i<=n;i++)
        v[i]=i;
    for(int i=2;i<=n;i++)
        if(v[i]==i)
            for(int j=i;j<=n;j=j+i)
                v[j]=v[j]-v[j]/i;
}

int main()
{
    fin>>n;
    euler();
    sol=v[1];
    for(int i=2;i<=n;i++)
        sol=sol+v[i]*2;
    fout<<sol;
}