OFFSET
1,6
LINKS
Harvey P. Dale, Table of n, a(n) for n = 1..1000
FORMULA
a(n) = A000040(n-3) - a(n-1) - a(n-2) - a(n-3). - Jason Yuen, Sep 01 2024
MATHEMATICA
(*seed*)b4 = {0, 0, 1}; Do[x = Prime[n] - (b4[[ -1]] + b4[[ -2]] + b4[[ -3]]); b4 = Append[b4, x], {n, 1, 200}]; b4
nxt[{a_, b_, c_}] := {b, c, NextPrime[a + b + c] - (a+b + c)}; NestList[nxt, {0, 0, 1}, 100][[All, 1]] (* Harvey P. Dale, Sep 20 2022 *)
CROSSREFS
KEYWORD
nonn,easy
AUTHOR
Zak Seidov, Feb 15 2005
STATUS
approved