#pragma GCC optimize ("-O3","unroll-loops")
#include<iostream>
#include<string>
#include<algorithm>
#include<vector>
#include<queue>
#include<map>
#include<math.h>
#include<iomanip>
#include<set>
#include<numeric>
#include<cstring>
#include<cstdio>
#include<functional>
#include<bitset>
#include<limits.h>
#include<cassert>
#include<iterator>
#include<complex>
#include<stack>


#define REP(i, n) for(int i = 0;i < n;i++)
#define REPR(i, n) for(int i = n;i >= 0;i--)
#define FOR(i, m, n) for(int i = m;i < n;i++)
#define FORR(i, m, n) for(int i = m;i >= n;i--)
#define SORT(v, n) sort(v, v+n);
#define VSORT(v) sort(v.begin(), v.end());
#define REVERSE(v,n) reverse(v,v+n);
#define VREVERSE(v) reverse(v.begin(), v.end());
#define ll long long
#define pb(a) push_back(a)
#define m0(x) memset(x,0,sizeof(x))
#define print(x) cout<<x<<'\n';
#define pe(x) cout<<x<<" ";
#define lb(v,n) lower_bound(v.begin(), v.end(), n);
#define ub(v,n) upper_bound(v.begin(), v.end(), n);
#define int long long
//#define int unsigned long long
#define all(x) (x).begin(), (x).end()
#define double long double

using namespace std;

template<class T> inline bool chmin(T& a, T b) {
	if (a > b) {
		a = b;
		return true;
	}
	return false;
}
template<class T> inline bool chmax(T& a, T b) {
	if (a < b) {
		a = b;
		return true;
	}
	return false;
}

int MOD = 1e9 + 7;
const ll INF = 1e17;
const double pi = acos(-1);
const double EPS = 1e-10;
typedef pair<int, int>P;
const int MAX = 200020;


int dp[1000100][4];
signed main() {
	cin.tie(0);
	ios::sync_with_stdio(false);
	dp[1][1] = 1;
	dp[2][2] = 1;
	dp[3][3] = 1;
	int N; cin >> N;
	FOR(i, 1, N + 1) {
		dp[i][1] += dp[i - 1][2] + dp[i - 1][3];
		dp[i][1] %= MOD;
		if (i >= 2) {
			dp[i][2] += dp[i - 2][1] + dp[i - 2][3];
			dp[i][2] %= MOD;
		}
		if (i >= 3) {
			dp[i][3] += dp[i - 3][1] + dp[i - 3][2];
			dp[i][3] %= MOD;
		}
	}
	int ans = dp[N][1] + dp[N][2] + dp[N][3];
	ans %= MOD;
	print(ans);
}