#include<bits/stdc++.h>
using namespace std;
typedef long long ll;
const int N = 1e5+10,M = 20,mod = 998244353;
int addv(int x,int y){return (x+y>=mod)?(x+y-mod):(x+y);}
int subv(int x,int y){return (x>=y)?(x-y):(x-y+mod);}
void add(int& x,int y){x = addv(x,y);}
void sub(int& x,int y){x = subv(x,y);}
int qpow(int a,int n){
    int res = 1; a%=mod;
    while(n){
        if(n&1)res = 1ll*res*a%mod;
        n>>=1; a = 1ll*a*a%mod;
    }
    return res;
}
int qinv(int a){return qpow(a,mod-2);}
//
int n,m,f[N][M],fac[N],rfac[N],ans;

int C(int n,int m){
    if(n<m || m<0)return 0;
    return 1ll*fac[n]*rfac[m]%mod*rfac[n-m]%mod;
}

int main(){
    ios::sync_with_stdio(false); cin.tie(0);

    cin>>m>>n;
    fac[0] = 1; for(int i=1;i<=m;i++)fac[i] = 1ll*fac[i-1]*i%mod;
    rfac[m] = qinv(fac[m]); for(int i=m-1;i>=0;i--)rfac[i] = 1ll*rfac[i+1]*(i+1)%mod;

    for(int i=1;i<=m;i++)f[i][1] = 1;
    for(int i=1;i<=m;i++)for(int j=1;j<M;j++)if(f[i][j]){
        int w = f[i][j];
        for(int k=2*i;k<=m;k+=i)add(f[k][j+1],w);
    }
    ans = 1ll*C(m,n)*n%mod;
    for(int i=1;i<=m;i++)for(int j=1;j<M && j<=n;j++)if(f[i][j]){
        int w = f[i][j];
        sub(ans,1ll*w*C(m/i-1,n-j)%mod);
    }
    cout<<ans<<endl;

    return 0;
}