#include "bits/stdc++.h" using namespace std; typedef long long ll; typedef long double ld; #define mp make_pair #define pb push_back #define FOR(i,a,x) for(int i=(a);i<(x);i++) #define rep(i,n) FOR(i,0,n) #define xFOR(i,a,x) for(int i=(a);i<=(x);i++) #define sor(v) sort(v.begin(),v.end()) #define rev(s) reverse(s.begin(),s.end()) #define lb(vec,a) lower_bound(vec.begin(),vec.end()) #define ub(vec,a) upper_bound(vec.begin(),vec.end()) #define uniq(vec) vec.erace(unique(vec.begin(),vec.end(),vec.end)) #define mp1(a,b,c) P1(a,P(b,c)) #define all(x) (x).begin(),(x).end() #define debug(X) cout<<"["<<#X<<"]"<= 0 && y >= 0 && xMax > x && yMax > y; } inline int toInt(string s) { int v; istringstream sin(s); sin >> v; return v; } template inline string toString(const T &a) { ostringstream oss; oss << a; return oss.str(); } template inline T sqr(T x) { return x*x; } const int dx[8] = { 1, 0, -1, 0, 1, 1, -1, -1 }, dy[8] = { 0, -1, 0, 1, -1, 1, -1, 1 }; const int mod = 1000000007; const int INF = 1e9; const int NIL = -1; #define MAX_N 10010 #define MAX_K 100 #define MAX_V 10000 ll n; ll dp[3][1000100]; ll ans; int main() { cin >> n; dp[0][1] = 0; dp[1][1] = 1; dp[2][1] = 0; for (int k = 2; k <= n; k++) { dp[0][k] += (dp[2][k - 1] + dp[1][k - 1])%mod; dp[1][k] += dp[0][k - 1]%mod; dp[2][k] += dp[1][k - 1]%mod; } ans = (dp[0][n]%mod + dp[1][n]%mod + dp[2][n]%mod); cout << ans%mod << endl; }