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 A079677 #8 May 02 2012 13:19:55 %S A079677 2,1,1,0,0,0,1,0,2,3,2,0,5,0,2,3,4,0,5,4,2,3,2,0,13,4,10,11,14,0,23,4, %T A079677 4,9,10,14,11,6,12,3,2,6,7,0,16,9,24,0,5,20,18,23,14,6,9,12,10,21,4, %U A079677 30,13,38,4,7,16,12,19,36,22,31,4,32,11,12,60,7,2,6,27,12,62,25,20,0,19,78,6 %N A079677 Distance from F(n) to closest prime, where F(n) is the n-th Fibonacci number. %H A079677 T. D. Noe, <a href="/A079677/b079677.txt">Table of n, a(n) for n = 0..1000</a> %t A079677 Table[f = Fibonacci[n]; If[PrimeQ[f], 0, Min[f - NextPrime[f, -1], NextPrime[f] - f]], {n, 0, 100}] (* _T. D. Noe, May 02 2012 *) %o A079677 (PARI) a(s)=min(abs(precprime(fibonacci(s))-fibonacci(s)),abs(nextprime(fibonacci(s))-fibonacci(s))) %Y A079677 Cf. A051699, A000045. %K A079677 nonn %O A079677 0,1 %A A079677 _Benoit Cloitre_, Jan 26 2003