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.

A138183 Smallest Fibonacci number not less than the n-th prime.

This page as a plain text file.
%I A138183 #8 Apr 22 2018 08:47:01
%S A138183 2,3,5,8,13,13,21,21,34,34,34,55,55,55,55,55,89,89,89,89,89,89,89,89,
%T A138183 144,144,144,144,144,144,144,144,144,144,233,233,233,233,233,233,233,
%U A138183 233,233,233,233,233,233,233,233,233,233,377,377
%N A138183 Smallest Fibonacci number not less than the n-th prime.
%e A138183 a(4) = 8 because the 8 is the smallest Fibonacci number not less than 7 (the 4th prime).
%t A138183 With[{fibs=Fibonacci[Range[20]]},Table[SelectFirst[fibs,#>=n&],{n,Prime[ Range[60]]}]] (* Requires Mathematica version 10 or later *) (* _Harvey P. Dale_, Apr 22 2018 *)
%o A138183 (PARI) a(n) = {p = prime(n); i = 0; until ((f = fibonacci(i)) >= p, i++); f;} \\ _Michel Marcus_, Aug 31 2013
%Y A138183 Cf. A138182, A138185.
%K A138183 easy,nonn
%O A138183 1,1
%A A138183 _Colm Mulcahy_, Mar 04 2008