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 A084298 #17 May 14 2020 17:21:45
%S A084298 1,2,26,48,108,292,6471,8147,20745,30803,38806,79760,254050
%N A084298 Integer quotients pi(m*prime(m))/m.
%F A084298 a(n) = A000720(A084295(n)*A084297(n))/A084295(n).
%t A084298 Do[s=PrimePi[n*Prime[n]]/n; If[IntegerQ[s], Print[s]], {n, 1, 100000}]
%Y A084298 Cf. A000040, A000720, A057855, A084295, A084297.
%K A084298 nonn,more
%O A084298 1,2
%A A084298 _Labos Elemer_, May 27 2003
%E A084298 a(9)-a(12) from _Giovanni Resta_, Sep 02 2019
%E A084298 a(13) from _Chai Wah Wu_, May 14 2020