#include <bits/stdc++.h>
using namespace std;
const int K = 5e3 + 5;
const int mod = 1e9 + 7;
long long s2[K][K];
int n, k;
long long fp(long long a, long long b) {
  if (!b) return 1ll;
  long long t = fp(a, b / 2);
  if (b & 1)
    return t * t % mod * a % mod;
  else
    return t * t % mod;
}
signed main() {
  cin >> n >> k;
  s2[0][0] = 1;
  for (int i = 1; i <= k; i++)
    for (int j = 1; j <= i; j++)
      s2[i][j] = (s2[i - 1][j - 1] + j * s2[i - 1][j]) % mod;
  long long pw2 = fp(2, n);
  long long inv2 = fp(2, mod - 2);
  long long downp = 1ll;
  long long ans = 0ll;
  for (int i = 0; i <= k; i++) {
    (ans += downp * s2[k][i] % mod * pw2 % mod) %= mod;
    (downp *= (n - i)) %= mod;
    (pw2 *= inv2) %= mod;
  }
  if (!k) --ans;
  cout << ans << endl;
}
