#include using namespace std; using ll = long long; using VI = vector; using VL = vector; using PII = std::pair; using PLL = std::pair; #define rep(i, n) for (int i = 0; i < (int)(n); i++) #define repr(i, n) for (int i = (int)(n)-1; i >= 0; i--) #define rep2(i, s, n) for (int i = (s); i < (int)(n); i++) #define allpt(v) (v).begin(), (v).end() #define allpt_c(v) (v).cbegin(), (v).cend() #define allpt_r(v) (v).rbegin(), (v).rend() const int mod = 1e9 + 7; const string wsp = " "; const string tb = "\t"; const string rt = "\n"; template void show1dvec(const vector &v) { if (v.size() == 0) return; int n = v.size() - 1; rep(i, n) cout << v[i] << wsp; cout << v[n] << rt; return; } template void show2dvec(const vector> &v) { int n = v.size(); rep(i, v[i].size()) show1dvec(v[i]); } template void show1dpair(const vector> &v) { int n = v.size(); rep(i, n) cout << v[i].first << wsp << v[i].second << rt; return; } template void pairzip(const vector> &v, vector &t, vector &s) { int n = v.size(); rep(i, n) { t.push_back(v[i].first); s.push_back(v[i].second); } return; } template void maxvec(vector &v) { T s = v[0]; int n = v.size(); rep(i, n - 1) { if (s > v[i + 1]) { v[i + 1] = s; } s = v[i + 1]; } } template bool myfind(T t, S s) { return find(t.cbegin(), t.cend(), s) != t.cend(); } const int maxint = 1e9; struct timestamp; vector shortest; vector>> connective; int main() { #ifdef DEBUG cout << "DEBUG MODE" << endl; ifstream in("input.txt"); //for debug cin.rdbuf(in.rdbuf()); //for debug #endif const int nmax = 1000001; int n; cin >> n; vector> dp(nmax, vector(4, 0)); rep(i, 4) dp[0][i] = 1; dp[1][1] = 1; dp[2][2] = 1; dp[3][1] = dp[3][2] = 1, dp[3][3] = 1; if (n >= 4) { rep2(i, 4, n + 1) { dp[i][1] = dp[i - 1][2] + dp[i - 1][3]; if (dp[i][1] >= mod) dp[i][1] -= mod; dp[i][2] = dp[i - 2][1] + dp[i - 2][3]; if (dp[i][2] >= mod) dp[i][1] -= mod; dp[i][3] = dp[i - 3][1] + dp[i - 3][2]; if (dp[i][3] >= mod) dp[i][1] -= mod; } } cout << (dp[n][1] + dp[n][2] + dp[n][3]) % mod << rt; return 0; }