http://codeforces.com/contest/166/problem/E
#include<algorithm>
#include<set>
#include<vector>
#include<queue>
#include<cmath>
#include<cstring>
#include<iostream>
#include<algorithm>
#include<set>
#include<vector>
#include<queue>
#include<cmath>
#include<cstring>
#include<sstream>
#include<cstdio>
#include<ctime>
#include<map>
#include<stack>
#include<string>
using namespace std;
#define sfi(i) scanf("%d",&i)
#define sfl(i) scanf("%lld",&i)
#define pri(i) printf("%d\n",i)
#define sff(i) scanf("%lf",&i)
#define ll long long
#define mem(x,y) memset(x,y,sizeof(x))
#define INF 0x3f3f3f3f
#define eps 1e-6
#define PI acos(-1)
#define lowbit(x) ((x)&(-x))
#define fl() printf("flag\n")
ll gcd(ll a,ll b){while(b^=a^=b^=a%=b);return a;}
const int maxn=4e5+100;
const int mod=1e9+7;
int dp[10000009][4];
int main()
{
dp[1][1]=dp[1][0]=dp[1][2]=1;
for(int i=2;i<=1e7;i++)
{
for(int j=0;j<4;j++)
{
for(int k=0;k<4;k++)
{
if(j!=k)
{
dp[i][j]+=dp[i-1][k];
dp[i][j]%=mod;
}
}
}
}
int n;
while(cin>>n)
{
cout<<dp[n][3]<<endl;
}
return 0;
}