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 A084297 #23 Jan 09 2025 05:29:23
%S A084297 2,5,211,457,1223,3943,130259,167953,468473,721159,927317,2026061,
%T A084297 7066487
%N A084297 Primes p=prime(m) such that pi(m*p)/m is an integer.
%F A084297 a(n) = prime(A084295(n)).
%t A084297 Do[s=PrimePi[n*Prime[n]]/n; If[IntegerQ[s], Print[Prime[n]]], {n, 1, 100000}]
%Y A084297 Cf. A000040, A000720, A057855, A084295.
%K A084297 nonn,more
%O A084297 1,1
%A A084297 _Labos Elemer_, May 27 2003
%E A084297 Name edited by _Michel Marcus_, Aug 30 2019
%E A084297 a(9)-a(12) from _Giovanni Resta_, Sep 02 2019
%E A084297 a(13) from _Chai Wah Wu_, May 14 2020