|
|
A248757
|
|
Indices of prime Fibonacci 5-step numbers, A001591.
|
|
3
|
|
|
6, 10, 11, 28, 149, 172, 185, 754, 815, 1510, 1594, 3160, 3755, 10654, 12743, 71807, 155957
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,1
|
|
COMMENTS
|
This sequence is similar to A105756 but uses the indexing scheme defined by A001591 whose indices start with 0.
a(18) > 2*10^5.
|
|
LINKS
|
|
|
FORMULA
|
|
|
MATHEMATICA
|
a = {0, 0, 0, 0, 1}; For[n = 5, n ≤ 1000, n++, sum = Plus @@ a;
If[PrimeQ[sum], Print[n]]; a = RotateLeft[a]; a[[5]] = sum]
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn,more
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|