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.

A182487 Nextprime(F(n)) - prevprime(F(n)), where F(n) is the n-th Fibonacci number.

This page as a plain text file.
%I A182487 #10 Jul 29 2015 19:05:46
%S A182487 3,4,4,6,4,6,6,14,10,10,6,6,8,18,12,24,16,10,6,12,30,12,24,42,30,24,
%T A182487 60,24,30,34,30,36,46,12,36,18,34,24,24,30,36,52,72,16,22,48,44,50,34,
%U A182487 20,20,28,44,50,40,92,60,86,16,52,48,66,46,168,50,174,36
%N A182487 Nextprime(F(n)) - prevprime(F(n)), where F(n) is the n-th Fibonacci number.
%C A182487 Smallest prime following Fibonacci(n) minus largest prime immediately preceding Fibonacci(n). Starting from Fibonacci(4), because for n<4 there is no prime preceding Fibonacci(n).
%H A182487 Alois P. Heinz, <a href="/A182487/b182487.txt">Table of n, a(n) for n = 4..1000</a>
%F A182487 a(n) = A014208(n+4) - A180422(n).
%e A182487 a(0) = A014208(4) - A180422(0) = 5 - 2 = 3,
%e A182487 a(7) = A014208(11) - A180422(7) = 97-83 = 14.
%p A182487 a:= n-> (f-> nextprime(f)-prevprime(f))(combinat[fibonacci](n)):
%p A182487 seq(a(n), n=4..100);  # _Alois P. Heinz_, Jul 29 2015
%t A182487 Table[f = Fibonacci[n]; NextPrime[f] - NextPrime[f, -1], {n, 4, 100}] (* _T. D. Noe_, May 02 2012 *)
%Y A182487 Cf. A014208, A180422, A013633, A058043, A058054, A161503.
%Y A182487 Cf. A079677 (distance from F(n) to the nearest prime).
%K A182487 nonn,easy
%O A182487 4,1
%A A182487 _Alex Ratushnyak_, May 02 2012