#include <bits/stdc++.h>
using namespace std;

// #define int long long
#define rep(i, n) for (long long i = (long long)(0); i < (long long)(n); ++i)
#define reps(i, n) for (long long i = (long long)(1); i <= (long long)(n); ++i)
#define rrep(i, n) for (long long i = ((long long)(n)-1); i >= 0; i--)
#define rreps(i, n) for (long long i = ((long long)(n)); i > 0; i--)
#define irep(i, m, n) for (long long i = (long long)(m); i < (long long)(n); ++i)
#define ireps(i, m, n) for (long long i = (long long)(m); i <= (long long)(n); ++i)
#define SORT(v, n) sort(v, v + n);
#define REVERSE(v, n) reverse(v, v+n);
#define vsort(v) sort(v.begin(), v.end());
#define all(v) v.begin(), v.end()
#define mp(n, m) make_pair(n, m);
#define cout(d) cout<<d<<endl;
#define coutd(d) cout<<std::setprecision(10)<<d<<endl;
#define cinline(n) getline(cin,n);
#define replace_all(s, b, a) replace(s.begin(),s.end(), b, a);
#define PI (acos(-1))
#define FILL(v, n, x) fill(v, v + n, x);
#define sz(x) long long(x.size())

using ll = long long;
using vi = vector<int>;
using vvi = vector<vi>;
using vll = vector<ll>;
using vvll = vector<vll>;
using pii = pair<int, int>;
using pll = pair<ll, ll>;
using vs = vector<string>;
using vpll = vector<pair<ll, ll>>;
using tll = tuple<ll,ll,ll>;
using vtll = vector<tuple<ll,ll,ll>>;
using vb = vector<bool>;

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

const ll INF = 1e9;
const ll MOD = 1e9+7;
const ll LINF = 1e18;

// n が与えられるので、10^n 未満の数の中で数字が昇順に並んでいるものの個数を数える問題
// 桁dpをして、j=1: 与えられた数未満であるものの個数を数える
// dpの添え字に直前に選んだ数をkとして管理しておき、kを見て次の値として選べるかを判定する
// 10^n なので、考える数字の長さはn+1になることに注意する
// 一番外の、"i桁目まで"のループはn+1回す必要があり、解はdp[n+1][1][0~9] に格納される

ll dp[1001000][2][10]; // pos, isLess, prevNum


signed main()
{
  cin.tie( 0 ); ios::sync_with_stdio( false );
  ll n; cin>>n;
  string s="1";
  rep(i,n) s.push_back('0');
  
  dp[0][0][0]=1;
  rep(i,n+1) rep(j,2) rep(k,10){
    ll now=s[i]-'0';
    rep(nxt,10){
      if(nxt>now&&j==0) continue;
      if(nxt<k) continue;
      ll nj=j, nk=nxt;
      if(nxt<now) nj=1;
      (dp[i+1][nj][nk]+=dp[i][j][k])%=MOD;
    }
  }
  ll ans=0;
  rep(k,10) (ans+=dp[n+1][1][k])%=MOD;
  cout<<ans<<endl;
}