cp's OEIS Frontend

This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.

A153888 Second-to-smallest of five consecutive Fibonacci numbers such that sum of five consecutive Fibonacci numbers is prime number.

This page as a plain text file.
%I A153888 #6 Dec 11 2018 13:25:39
%S A153888 1,2,3,13,144,233,4181,196418,317811,1346269,32951280099,
%T A153888 6557470319842,14472334024676221,160500643816367088,
%U A153888 4660046610375530309,22698374052006863956975682,155576970220531065681649693
%N A153888 Second-to-smallest of five consecutive Fibonacci numbers such that sum of five consecutive Fibonacci numbers is prime number.
%C A153888 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,...
%H A153888 Harvey P. Dale, <a href="/A153888/b153888.txt">Table of n, a(n) for n = 1..29</a>
%t A153888 a=0;b=1;c=1;d=2;lst={};Do[e=Fibonacci[n];p=a+b+c+d+e;If[PrimeQ[p],AppendTo[lst,b]];a=b;b=c;c=d;d=e,{n,4,6!}];lst
%t A153888 Select[Partition[Fibonacci[Range[0,150]],5,1],PrimeQ[Total[#]]&][[All,2]] (* _Harvey P. Dale_, Dec 11 2018 *)
%Y A153888 Cf. A000045, A001906, A000071, A001605, A153862, A153863, A153865, A153866, A153867, A153887
%K A153888 nonn
%O A153888 1,2
%A A153888 _Vladimir Joseph Stephan Orlovsky_, Jan 03 2009