A159259 Positive numbers n such that 8*n^2-2*n-1 divides Fibonacci(n).

27, 37, 97, 577, 687, 727, 777, 807, 1297, 1707, 1917, 2067, 2487, 2787, 2977, 3027, 3037, 3067, 3277, 3367, 3417, 3507, 3837, 4047, 4257, 4377, 4447, 4567, 4717, 5137, 5557, 5637, 5677, 5917, 5967, 6057, 6187, 6327, 7077, 7087, 7357, 7407, 7507, 7597

Offset: 1

Author

Arkadiusz Wesolowski, Apr 07 2009

Keywords

• nonn

Comments

The prime numbers of this sequence are in A159231.

Links

• Arkadiusz Wesolowski, Table of n, a(n) for n = 1..1000
• Chris Caldwell, The Prime Glossary, Fibonacci number

Crossrefs

Cf. A000045, A023172, A159234, A159231, A181890.

Programs

Magma

[n : n in [1..7597] | IsZero(Fibonacci(n) mod (8*n^2-2*n-1))] // Arkadiusz Wesolowski, Nov 09 2013

Mathematica

Select[Range[7597], Mod[Fibonacci[#], 8*#^2 - 2*# - 1] == 0 &] (* Arkadiusz Wesolowski, Dec 12 2011 *)

PARI

for(n=1, 7597, if(Mod(fibonacci(n), 8*n^2-2*n-1)==0, print1(n, ", "))); \\ Arkadiusz Wesolowski, Nov 09 2013