def polymul(f,g):
    lf = len(f)
    lg = len(g)
    res = [0]*(lf+lg-1)
    for i in range(lf):
        for j in range(lg):
            res[i+j] += f[i]*g[j]
            res[i+j] %= MOD
    return res

def fps_nth_term(f,g,N):
    assert g[0] != 0
    while N:
        h = g[:]
        for i in range(1,len(g),2):
            h[i] = -h[i]
        f = polymul(f,h)[N%2:N+1:2]
        g = polymul(g,h)[:N+1:2]
        N //= 2
    return f[0]*pow(g[0],MOD-2,MOD)%MOD

def g(lst):
    v = [1]
    for c in lst:
        v = polymul(v,[1]+[0]*(c-1)+[-1])
    return v

MOD = 10**9+7
N = int(input())-4
ans = 0
#a<b<c
if N >= 3: ans += fps_nth_term([1],g([3,2,1]),N-3)
#a=b<c
if N >= 1: ans += fps_nth_term([1],g([3,1]),N-1)
#a<b=c
if N >= 2: ans += fps_nth_term([1],g([3,2]),N-2)
#a=b=c
ans += int(N%3==0)
print(ans%MOD)