#include <bits/stdc++.h>
using namespace std;
long long n, k;
long long mem[2000][2000];
long long C(long long n, long long k) {
  if (mem[n][k] != -1) return mem[n][k];
  if (k > n / 2) k = n - k;
  if (k == 1) return n;
  if (k == 0) return 1ll;
  return mem[n][k] = C(n - 1, k) + C(n - 1, k - 1);
}
long long fact(long long n) {
  long long ret = 1;
  for (long long i = 1; i <= n; i++) ret *= i;
  return ret;
}
long long subFact(long long n) {
  long long f = fact(n);
  long long sum = 0;
  for (int k = 0; k <= n; k++) {
    if (k % 2 == 0)
      sum += f / fact(k);
    else
      sum -= f / fact(k);
  }
  return sum;
}
long long ans(long long n, long long k) {
  long long ret = 0;
  for (long long i = n - k; i <= n; i++) {
    ret += C(n, i) * subFact(n - i);
  }
  return ret;
}
int main() {
  for (int i = 0; i < 2000; i++)
    for (int j = 0; j < 2000; j++) mem[i][j] = -1;
  cin >> n >> k;
  cout << ans(n, k);
}
