A153863 Second-to-smallest of four consecutive Fibonacci numbers such that sum of four consecutive Fibonacci numbers is prime number.
1, 2, 5, 8, 34, 89, 377, 610, 1597, 514229, 9227465, 63245986, 1134903170, 20365011074, 956722026041, 117669030460994, 5527939700884757, 70492524767089125814114, 44225333398004061429732838340729878012027363723832270745251370289
Offset: 1
Keywords
Links
- Harvey P. Dale, Table of n, a(n) for n = 1..27
Programs
-
Mathematica
a=0;b=1;c=1;lst={};Do[d=Fibonacci[n];p=a+b+c+d;If[PrimeQ[p],AppendTo[lst,b]];a=b;b=c;c=d,{n,3,6!}];lst Select[Partition[Fibonacci[Range[200]],4,1],PrimeQ[Total[#]]&][[All,2]] (* Harvey P. Dale, Aug 28 2016 *)
Extensions
One more term from Harvey P. Dale, Aug 28 2016
Comments