import std.algorithm,
       std.string,
       std.range,
       std.stdio,
       std.conv;

ulong INF = ulong.max;
ulong M = 10L^^9 + 7;
ulong[4][1000001] dp;
ulong N;

ulong solve(ulong i, ulong prev) {
  if (dp[i][prev] != INF) { return dp[i][prev]; }

  if (i == N) { return 1; }
  int ret;

  foreach (d; 3.iota) {
    d++;
    if (prev != d && i + d <= N) {
      ret += solve(i + d, d);
      ret %= M;
    }
  }

  return dp[i][prev] = ret;
}

void main() {
  foreach (i; 1000001.iota) {
    foreach (j; 4.iota) {
      dp[i][j] = INF;
    }
  }

  N = readln.chomp.to!ulong;
  writeln(solve(0, 0));
}