import sys input = lambda :sys.stdin.readline()[:-1] ni = lambda :int(input()) na = lambda :list(map(int,input().split())) yes = lambda :print("yes");Yes = lambda :print("Yes");YES = lambda : print("YES") no = lambda :print("no");No = lambda :print("No");NO = lambda : print("NO") ####################################################################### fact = [1] for i in range(15): fact.append((i+1)*fact[-1]) k = 17 b = [[0 for j in range(k)]for i in range(k+1)] b[0][0] = 1 for i in range(k): for j in range(k): if j: b[i+1][j] += b[i][j-1] b[i+1][j] += b[i][j] * (-i) n = ni() m = ni() if m > n: print(0) exit() from fractions import Fraction a = [Fraction(0)] * (n+1) a[-1] = Fraction(1) ans = [] for i in range(n, 0, -1): x = a[i] * fact[i] ans.append(a[i]*fact[i]) for j in range(n+1): a[j] -= x * b[i][j] / fact[i] #print(a) ans = [0] + ans[::-1] print(int(ans[m]))