n = gets.to_i
ans = 1
$mod = 10**9+7

def pow(a,b)
  if b == 1
    a
  elsif b%2 == 0
    (pow(a,b/2)**2)%$mod
  else
    (a*pow(a,b/2)**2)%$mod
  end
end

fact = Array.new(n+10,1)
for i in 2..n+9
  fact[i] = (fact[i-1]*i)%$mod
end

fact_inv = Array.new(n+10,1)
fact_inv[n+9] = pow(fact[n+9],$mod-2)
(n+9).downto(1) do |i|
  fact_inv[i-1] = (fact_inv[i]*i)%$mod
end

for i in 1..n
  ans += (fact[i+8]*fact_inv[i]*fact_inv[8])%$mod
  ans %= $mod
end

puts ans