#include <bits/stdc++.h>
int M,vq[200009],miu[200009],su[200009],k;
std::vector<int> t[200009],tq,as,d[200009];
void dfs(int v,int p) {
    if(p==tq.size()) {
        as.push_back(v);
        return;
    }
    while(1) {
        dfs(v,p+1);
        if(v>M/tq[p]) return;
        v*=tq[p];
    }
}
int cl(int x,int y) {
    int as=0;
    for(int i=0;i<d[x].size();i++) {
        int p=d[x][i];
        as+=miu[p]*y/p;
    }
    return as;
}
signed main(void) {
    scanf("%d",&M);
    long long ans=0;
    miu[1]=1;
    for(int i=2;i<=M;i++) {
        if(!vq[i]) {
            su[++k]=i;
            miu[i]=-1;
            for(int j=i;j<=M;j+=i) t[j].push_back(i);
        }
        for(int j=1;j<=k&&su[j]*i<=M;j++) {
            vq[i*su[j]]=1;
            if(i%su[j]==0) break;
            miu[i*su[j]]=-miu[i];
        }
    }
    for(int i=1;i<=M;i++) {
        if(miu[i]==0) continue;
        for(int j=i;j<=M;j+=i) d[j].push_back(i);
    }
    for(int b=2;b<=M;b++) {
        tq.clear();
        as.clear();
        for(int i=0;i<t[b].size();i++) {
            int x=t[b][i];
            tq.push_back(x);
        }
        dfs(1,0);
        for(int j=0;j<as.size();j++) {
            int x=as[j];
            ans+=1ll*(b-1)/x*cl(b,M/x);
        }
    }
    printf("%lld",ans);
}