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 A073163 #14 Jan 13 2025 04:07:43
%S A073163 0,3,68,259,5500628,1180641920,19503263760,46464766631,863653341852,
%T A073163 306757978180563
%N A073163 Partial sums of Pi(k) arising in A073162.
%F A073163 Values of s(n) = A046992(n) such that s(n)/n is an integer.
%e A073163 Sum of first 17 values of Pi(n) equals 0+1+2+2+3+3+4+4+4+4+5+5+6+6+6+6+7 = 68 = 4*17. To continue, see A073224.
%t A073163 s = 0; Do[s = s + PrimePi[n]; If[ IntegerQ[s/n], Print[{n, s, s/n}]], {n, 1, 10^8}]
%Y A073163 Cf. A046992, A000720, A073162, A073164 & A073224.
%K A073163 nonn,more
%O A073163 1,2
%A A073163 _Labos Elemer_, Jul 18 2002
%E A073163 Edited and extended by _Robert G. Wilson v_, Jul 20 2002
%E A073163 a(10) from _Donovan Johnson_, Dec 15 2009