#define MD 998244353
ll@n,@k;
Mint a[k+1];
a[0]=1;
rep(i,n){
	rrep(j,k){
		a[j+1]+=a[j]/(n-i);
	}
	a[0]=0;
}
wt(sum(a(k+1)));