#include <cstdio>
#include <cstring>
#include <iostream>
#include <string>
#include <cmath>
#include <bitset>
#include <vector>
#include <map>
#include <set>
#include <queue>
#include <deque>
#include <algorithm>
#include <complex>
#include <unordered_map>
#include <unordered_set>
#include <random>
#include <cassert>
#include <fstream>
#include <utility>
#include <functional>
#include <time.h>
#include <stack>
#include <array>
#include <list>
#include <atcoder/all>
#define popcount __builtin_popcount
using namespace std;
using namespace atcoder;
typedef long long ll;
typedef pair<int, int> P;
using mint=modint1000000007;
mint f[4000010], invf[4000010];
void fac(int n){
    f[0]=1;
    for(ll i=1; i<=n; i++) f[i]=f[i-1]*i;
    invf[n]=f[n].inv();
    for(ll i=n-1; i>=0; i--) invf[i]=invf[i+1]*(i+1);
}
mint comb(int x, int y){
    if(!(0<=y && y<=x)) return 0;
    return f[x]*invf[y]*invf[x-y];
}
int n, m;
mint x[1000010];
int main()
{
    cin>>n>>m;
    fac(4000000);
    mint ans=0;
    for(int i=m; i<=n; i++){
        ans+=comb(n, i)*n;
    }
    for(int d=1; d<=n; d++){
        // for(int i=m; i<=(n-d)/2; i++){
        //     x[d]+=comb(n, i);
        // }
        if((n-d)/2>(n-d-1)/2 && m<=(n-d)/2){
            ans+=d*comb(n, (n-d)/2);
        }
        int l1=min(n-d-m, n-d-(n-d)/2-1), l2=min(n-d-m-1, n-d-1-(n-d-1)/2-1);
        if(l1>l2 && l1>=0){
            ans+=d*comb(n, l1);
        }
        // for(int i=0; i<=n-d-m && i<n-d-(n-d)/2; i++){
        //     x[d]+=comb(n, i);
        // }
    }
    //cout<<ans.val()<<endl;
    for(int d=1; d<=n; d++){
        // for(int i=0; i<=(n-d)/2 && i<=n-m; i++){
        //     x[d]+=comb(n, i);
        // }
        if((n-d+2)/2>(n-d+1)/2 && (n-d)/2<=n-m){
            ans+=d*comb(n, (n-d)/2);
        }
        if(max(0, m-d)!=max(0, m-d-1) && max(0, m-d-1)<=n-d-(n-d)/2-1){
            ans-=d*comb(n, max(0, m-d-1));
        }
        if(n-d+2-(n-d+2)/2>n-d+1-(n-d+1)/2 && max(0, m-d-1)<=n-d-(n-d)/2-1){
            ans+=d*comb(n, n-d-(n-d)/2-1);
        }
        // for(int i=max(0, m-d); i<n-d-(n-d)/2; i++){
        //     x[d]+=comb(n, i);
        // }
    }
    // for(int d=1; d<=n; d++){
    //     ans+=d*(x[d]-x[d+1]);
    // }
    // for(int d=1; d<=n; d++){
    //     if(d<n && (n-d-1)/2!=(n-d-2)/2 && m<=(n-d-1)/2){
    //         ans+=d*comb(n, (n-d-1)/2);
    //     }
    //     int l1=min(n-d-m, (n-d)/2), l2=min(n-d-m-1, (n-d-1)/2);
    //     if(l1>l2) ans+=d*comb(n, l1);
    // }
    // for(int d=1; d<=n; d++){
    //     if(d<n && (n-d-1)/2!=(n-d-2)/2 && (n-d-1)/2<=n-m){
    //         ans+=d*comb(n, (n-d-1)/2);
    //     }
    //     if(m-d-1<=(n-d-1)/2) ans-=d*comb(n, m-d-1);
    //     if((n-d)/2!=(n-d-1)/2 && m-d<=(n-d)/2) ans+=d*comb(n, (n-d)/2);
    // }
    cout<<ans.val()<<endl;
    return 0;
}