A215158 Primes p such that (2*p - 1)*(4*p + 1)*(14*p - 1) divides Fibonacci(p).

727, 7507, 58417, 164767, 192697, 260317, 362977, 624847, 800557, 838837, 946417, 2107447, 2334187, 2382607, 2461717, 2495947, 2523517, 2566027, 2923747, 3169237, 3373177, 3373687, 3763717, 3771907, 3838897, 4143637, 4635277, 4741837, 4979047, 5097247

Offset

1,1

Links

Table of n, a(n) for n=1..30.

Chris Caldwell, The Prime Glossary, Fibonacci number

C. K. Caldwell, "Top Twenty" page, Fibonacci cofactor

Mathematica

Select[Prime@Range[10^3], Mod[Fibonacci[#], 112*#^3 - 36*#^2 - 12*# + 1] == 0 &]

Prog

(PARI) a=-1; b=1; for(n=0, 2548623, a=a+b; b=b+a; p=2*n+1; if(isprime(p)&&Mod(b, 112*p^3-36*p^2-12*p+1)==0, print1(p, ", "))); \\ Arkadiusz Wesolowski, Nov 16 2013

Crossrefs

Subsequence of A159231.

Cf. A000045, A159259.

Sequence in context: A158394 A038600 A157430 * A178654 A094733 A321822

Adjacent sequences: A215155 A215156 A215157 * A215159 A215160 A215161

Keyword

less,nonn

Author

Arkadiusz Wesolowski, Aug 04 2012

Status

approved