A248757 Indices of prime Fibonacci 5-step numbers, A001591.
6, 10, 11, 28, 149, 172, 185, 754, 815, 1510, 1594, 3160, 3755, 10654, 12743, 71807, 155957
Offset: 1
Links
- Tony D. Noe and Jonathan Vos Post, Primes in Fibonacci n-step and Lucas n-step Sequences, J. of Integer Sequences, Vol. 8 (2005), Article 05.4.4
- Eric Weisstein's World of Mathematics, Fibonacci n-Step Number
Programs
-
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]
Formula
a(n) = A105756 (n) + 3.
Comments