#include <stdio.h>
long long n,i,nr=1,j,q,cop,fi,k,v[1000];
float ff;
int main()
{
    FILE *f1,*f2;
    f1=fopen("fractii.in","r");
    f2=fopen("fractii.out","w");
    fscanf(f1,"%lld",&n);
    fclose(f1);
    bool mat[n+5];
    for(i=1;i<=n;i++)mat[i]=1;
    for(i=2;i<=n;i++)
        if(mat[i])
        {
            q=i;
            while(n>=q)
            {
                q+=i;
                mat[q]=0;
            }
        }
    nr=1;
    for(i=2;i<=n;i++)
    {
        cop=i;k=0;
        if(mat[cop]==1)
        {
            cop=1;
            v[0]=i;
            k=1;
        }
        q=2;
        while(cop>1)
        {
            if(cop%q==0)
            {
                while(cop%q==0)cop/=q;
                v[k++]=q;
                q=1;
            }
            q++;
        }
        if(mat[i]==0)
        {
            ff=i;
            for(j=0;j<k;j++)
                ff*=((float)1-(1/(float)v[j]));
            fi=ff;
        }
        else
        {
            ff=fi=i-1;
        }
        nr=nr+fi*2;
    }
    fprintf(f2,"%lld",nr);
    fclose(f2);
    return 0;
}