#include <bits/stdc++.h>
#pragma GCC optimize ("fast-math", "unroll-loops")

using namespace std;

ifstream in ("pascal.in");
ofstream out ("pascal.out");

const int NMAX = 5e6;

int prec[3][NMAX + 5];
const int prime[3] = {2, 3, 5};

int main()
{
    int n, d;
    in >> n >> d;
    for (int i=1; i+i<=n; i++)
    {
        int x = i;
        for (int j=0; j<3; j++)
        {
            prec[j][i] = prec[j][i-1];
            while (x % prime[j] == 0)
                x /= prime[j], prec[j][i]++;
        }
    }

    int ans = 0;

    if (d == 2)
    {
        for (int i=1; i+i<=n; i++)
        {
            if (prec[0][n] - prec[0][i] - prec[0][n-i])
                ans++;
        }
        ans *= 2;
    }
    else if (d == 3)
    {
        for (int i=1; i+i<=n; i++)
        {
            if (prec[1][n] - prec[1][i] - prec[1][n-i])
                ans++;
        }
        ans *= 2;
    }
    else if (d == 5)
    {
        for (int i=1; i+i<=n; i++)
        {
            if (prec[2][n] - prec[2][i] - prec[2][n-i])
                ans++;
        }
        ans *= 2;
    }
    else if (d == 4)
    {
        for (int i=1; i+i<=n; i++)
        {
            if (prec[0][n] - prec[0][i] - prec[0][n-i] > 1)
                ans++;
        }
        ans *= 2;
    }
    else
    {
        for (int i=1; i+i<=n; i++)
        {
            if (prec[0][n] - prec[0][i] - prec[0][n-i] && prec[1][n] - prec[1][i] - prec[1][n-i])
                ans++;
        }
        ans *= 2;
    }
    out << ans - 1;

    return 0;
}