#include<cstdio>
#include<algorithm>
#include<cstring>
using namespace std;
long long a[5002][5002]={{1}},b[2][5002],i,j,m,n,z=1e9+7;char c[5001];
int main()
{
	scanf("%lld%s",&n,c),m=strlen(c);
	for(i=0;i<=n;i++)
	for(j=0;j<=m;j++)
	{
		b[i&1][j]=(b[i&1][j]<<1)%z;
		a[i][j]=(a[i][j]+b[i&1][j])%z;
		if(!j)a[i+1][j]=(a[i+1][j]+a[i][j])%z;
		b[i&1][j]=(a[i][j]+b[i&1][j])%z;
		a[i+1][j+1]=(a[i+1][j+1]+a[i][j])%z;
	}
	printf("%lld",a[n][m]);
	return 0;
}
