#include<iostream>
#include<string>
#include<iomanip>
#include<cmath>
#include<vector>
#include<algorithm>

using namespace std;

#define int long long
#define rep(i,n) for(int i = 0; i < (n); i++)
#define INF ((long long)1e18)
#define MOD ((int)1e9+7)
#define endl "\n"

#define yn(f) ((f)?"Yes":"No")
#define YN(f) ((f)?"YES":"NO")


#define IE9  111111112ll

inline long long power(long long x, long long n){
	long long ans = 1;
	for(;n;n>>=1,x*=x,ans%=MOD,x%=MOD)if(n&1)ans*=x;
	return ans%MOD;
}

signed main(){
	cin.tie(0);
	ios::sync_with_stdio(false);
	// cout<<fixed<<setprecision(10);
	
	int N, P;
	
	scanf("%lld",&N);
	
	P = power(10,N);
	
	cout<<(3*(P+MOD-1)%MOD*IE9%MOD+P)%MOD<<endl;
	

	
	return 0;
}