A153862 Smallest of four consecutive Fibonacci numbers such that sum of four consecutive Fibonacci numbers is prime number.

1, 1, 3, 5, 21, 55, 233, 377, 987, 317811, 5702887, 39088169, 701408733, 12586269025, 591286729879, 72723460248141, 3416454622906707, 43566776258854844738105

Offset: 1

Author

Vladimir Joseph Stephan Orlovsky, Jan 03 2009

Keywords

• nonn

Comments

1+1+2+3=7, 1+2+3+5=11, 3+5+8+13=29, 5+8+13+21=47, 21+34+55+89=199,...

Crossrefs

Cf. A000045, A001906, A000071, A001605

Programs

Mathematica

a=0;b=1;c=1;lst={};Do[d=Fibonacci[n];p=a+b+c+d;If[PrimeQ[p],AppendTo[lst,a]];a=b;b=c;c=d,{n,3,6!}];lst
Transpose[Select[Partition[Fibonacci[Range[500]],4,1],PrimeQ[ Total[ #]]&]] [[1]] (* Harvey P. Dale, Jan 11 2013 *)