#include #include #include #include #include #include #include #include #include #include #include #include #include #include #include #include #include #include #include #include #include #include #define FOR(i,a,b) for(int i=(a);i<(b);++i) #define rep(i,n) FOR(i,0,n) #define REP(i,n) FOR(i,0,n) #define each(i,c) for(auto i=(c).begin(); i!=(c).end(); ++i) #define EACH(i,c) for(auto i=(c).begin(); i!=(c).end(); ++i) #define exist(s,e) ((s).find(e)!=(s).end()) #define dump(x) cerr << #x << " = " << (x) << endl; #define debug(x) cerr << #x << " = " << (x) << " (L" << __LINE__ << ")" << " " << __FILE__ << endl; #define deb(x) cerr << #x << " = " << (x) << " , "; #define debl cerr << " (L" << __LINE__ << ")"<< endl; #define sz(s) (int)((s).size()) #define clr(a) memset((a),0,sizeof(a)) #define nclr(a) memset((a),-1,sizeof(a)) #define pb push_back #define INRANGE(x,s,e) ((s)<=(x) && (x)<(e)) #define MP(x,y) make_pair((x),(y)) double pi=3.14159265358979323846; using namespace std; typedef long long ll; typedef pair pii; typedef vector vi; typedef vector vvi; typedef vector vl; typedef vector vvl; typedef vector vd; typedef vector vvd; typedef vector vs; template std::ostream& operator<<(std::ostream& os, const vector& z){ os << "[ "; REP(i,z.size())os << z[i] << ", " ; return ( os << "]" << endl); } template std::ostream& operator<<(std::ostream& os, const set& z){ os << "set( "; EACH(p,z)os << (*p) << ", " ; return ( os << ")" << endl); } template std::ostream& operator<<(std::ostream& os, const map& z){ os << "{ "; EACH(p,z)os << (p->first) << ": " << (p->second) << ", " ; return ( os << "}" << endl); } template std::ostream& operator<<(std::ostream& os, const pair& z){ return ( os << "(" << z.first << ", " << z.second << ",)" ); } double get_time(){ struct timeval tv; gettimeofday(&tv, NULL); return tv.tv_sec + tv.tv_usec*1e-6; } typedef unsigned int uint32_t; struct RND{ uint32_t x; uint32_t y; uint32_t z; uint32_t w; RND(){ x=123456789; y=362436069; z=521288629; w=88675123; } void init(int seed){ x=123456789; y=362436069; z=521288629; w=seed+100; REP(i,10)get(); } uint32_t get(){ uint32_t t; t=x^(x<<11); x=y;y=z;z=w; w=(w^(w>>19))^(t^(t>>8)); return w; } }; RND rnd; ll n; ll mod = 1000000007LL; ll memo[1010][1010][2][2]; ll brute(ll n){ vl a(n); rep(i,n)a[i]=i; ll cnt = 0; do{ bool ok = true; rep(i,n-1) if(abs(a[i+1]-a[i])==2)ok=false; if(ok) cnt++; }while(next_permutation(a.begin(), a.end())); return cnt; } ll rec(ll i, ll dame, int f1, int f2){ if(dame==-1)return 0; //既にi個置いた。 if(i==n)return dame==0; ll &ret = memo[i][dame][f1][f2]; if(ret != -1) return ret; ll ans = 0; if(f1==0){ if(f2==0){ ans += dame*rec(i+1, dame-1, f2, 0); //既にダメな場所においた。 } else{ ans += (dame-1)*rec(i+1, dame-1, f2, 0); //既にダメな場所においた。 ans += rec(i+1, dame-1, 0, 0); //既にダメな場所においた。 } ans += (i+1-2-dame) * rec(i+1, dame, f2, 0) ; // すでにOKかつ普通の場所においた。 ans += 2*rec(i+1, dame+1, f2, 1); //やばい場所においた。 } else{ if(f2==0){ ans += (dame-1)*rec(i+1,dame-1,f2,0) ; //すでにダメな場所かつ、普通の場所 } else{ ans += (dame-2)*rec(i+1, dame-1, f2, 0); //既にダメな場所においた。 ans += rec(i+1, dame-1, 0, 0); //既にダメな場所においた。 } ans += (i+1-1-dame)*rec(i+1,dame,f2,0) ; // すでにOKかつ普通の場所。 ans += rec(i+1,dame+1,f2,1) + rec(i+1,dame,f2,1); //やばい場所。 } return ret = ans%mod; } void _main(istream &inp){ inp >> n; if(n==1){ cout << 1 << endl; return; } if(n==2){ cout << 2 << endl; return; } nclr(memo); cout << 2*rec(2,0,0,0)%mod << endl; } int main(){ if(0){ ifstream ifs("test.txt"); _main(ifs); } else{ _main(cin); } return 0; }