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.
%I A145026 #2 Mar 31 2012 12:38:16 %S A145026 5,21,34,144,610,987,24157817,7540113804746346429, %T A145026 18547707689471986212190138521399707760, %U A145026 382699285659014174244530850035136059033084785 %N A145026 Fibonacci numbers in A145025. %t A145026 PrimeNextDelta[n_]:=(Do[If[PrimeQ[n+k],d=k;Break[]],{k,12!}];d)(*Deltabetweenprimeandnextconsecutiveprime.*) PrimePrevDelta[n_]:=(Do[If[PrimeQ[n-k],d=k;Break[]],{k,12!}];d)(*Deltabetweenprimeandprevconsecutiveprime.*) lst={};Do[f=Fibonacci[n];d1=PrimePrevDelta[f];d2=PrimeNextDelta[f];If[d1==d2,AppendTo[lst,f]],{n,3,3*5!}];lst %K A145026 nonn %O A145026 1,1 %A A145026 _Vladimir Joseph Stephan Orlovsky_, Sep 29 2008