A153891 Largest of five consecutive Fibonacci numbers such that the sum of the five consecutive Fibonacci numbers is prime.

3, 8, 13, 55, 610, 987, 17711, 832040, 1346269, 5702887, 139583862445, 27777890035288, 61305790721611591, 679891637638612258, 19740274219868223167, 96151855463018422468774568, 659034621587630041982498215, 97605290770725966021179803308812675106786783237939047196728424115618

Offset: 1

Author

Vladimir Joseph Stephan Orlovsky, Jan 03 2009

Keywords

• nonn
• changed

Comments

0+1+1+2=3=7, 1+2+3+5+8=19, 2+3+5+8=13=31, 8+13+21+34+55=131, 89+144+233+377+610=1453, 144+233+377+610+987=2351,...

Crossrefs

Cf. A000045, A001906, A000071, A001605, A153862, A153863, A153865, A153866, A153867, A153887, A153888, A153889, A153890.

Programs

Mathematica

a=0;b=1;c=1;d=2;lst={};Do[e=Fibonacci[n];p=a+b+c+d+e;If[PrimeQ[p],AppendTo[lst,e]];a=b;b=c;c=d;d=e,{n,4,6!}];lst
Transpose[Select[Partition[Fibonacci[Range[0,400]],5,1],PrimeQ[ Total[ #]]&]][[5]] (* Harvey P. Dale, Nov 14 2011 *)

Extensions

One more term (a(17)) from Harvey P. Dale, Nov 14 2011

a(18) from Alois P. Heinz, Aug 31 2025