|
|
A105761
|
|
Prime Fibonacci 7-step numbers, A066178.
|
|
2
|
|
|
|
OFFSET
|
1,1
|
|
COMMENTS
|
The next term is the 30673-digit probable prime 59456197869789581...206057955817 that is the 102490th term of the heptanacci sequence (using the definition in Noe-Post and Weisstein). This is too large to include here.
|
|
LINKS
|
|
|
MATHEMATICA
|
a={1, 0, 0, 0, 0, 0, 0}; lst={}; Do[s=Plus@@a; a=RotateLeft[a]; a[[ -1]]=s; If[PrimeQ[s], AppendTo[lst, s]], {n, 100}]; lst
|
|
CROSSREFS
|
|
|
KEYWORD
|
bref,nonn
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|