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.

A352124 Fibonacci numbers k such that pi(k) is also a Fibonacci number.

This page as a plain text file.
%I A352124 #33 Mar 26 2022 22:06:18
%S A352124 0,1,2,3,5,21,144
%N A352124 Fibonacci numbers k such that pi(k) is also a Fibonacci number.
%C A352124 No examples larger than pi(144) = 34 are known.
%C A352124 Next term is > Fibonacci(123), if it exists (checked using the b-file in A054782). - _Amiram Eldar_, Mar 05 2022
%H A352124 G. L. Honaker, Jr., <a href="https://primes.utm.edu/curios/page.php/34.html">Prime Curios!</a>.
%H A352124 Ron Knott, <a href="https://r-knott.surrey.ac.uk/Fibonacci/fibmaths.html">The Mathematical Magic of Fibonacci Numbers</a>.
%e A352124 21 is a term because 21 = Fibonacci(8) and pi(21) = 8 = Fibonacci(6).
%t A352124 Select[(f = Fibonacci[Join[{0}, Range[2, 20]]]), MemberQ[f, PrimePi[#]] &] (* _Amiram Eldar_, Mar 05 2022 *)
%o A352124 (PARI) isfib(n) = my(k=n^2); k+=(k+1)<<2; issquare(k) || (n>0 && issquare(k-8));
%o A352124 lista(nn) = for (n=0, nn, if (n!=1, my(k=fibonacci(n)); if (isfib(primepi(k)), print1(k, ", ")))); \\ _Michel Marcus_, Mar 07 2022
%Y A352124 Cf. A000045, A000720, A054782.
%K A352124 nonn,more
%O A352124 1,3
%A A352124 _Marc Kouyoumdjian_, Mar 05 2022