|
|
A153891
|
|
Largest of five consecutive Fibonacci numbers such that sum of five consecutive Fibonacci numbers is prime number.
|
|
1
|
|
|
3, 8, 13, 55, 610, 987, 17711, 832040, 1346269, 5702887, 139583862445, 27777890035288, 61305790721611591, 679891637638612258, 19740274219868223167, 96151855463018422468774568, 659034621587630041982498215
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,1
|
|
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,...
|
|
LINKS
|
|
|
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 *)
|
|
CROSSREFS
|
Cf. A000045, A001906, A000071, A001605, A153862, A153863, A153865, A153866, A153867, A153887, A153888, A153889, A153890
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
|
|
EXTENSIONS
|
One more term (a(17)) from Harvey P. Dale, Nov 14 2011
|
|
STATUS
|
approved
|
|
|
|