|
|
A073163
|
|
Partial sums of Pi(k) arising in A073162.
|
|
2
|
|
|
|
OFFSET
|
1,2
|
|
LINKS
|
|
|
FORMULA
|
Values of s(n) = A046992(n) such that s(n)/n is integer.
|
|
EXAMPLE
|
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.
|
|
MATHEMATICA
|
s = 0; Do[s = s + PrimePi[n]; If[ IntegerQ[s/n], Print[{n, s, s/n}]], {n, 1, 10^8}]
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
|
|
EXTENSIONS
|
|
|
STATUS
|
approved
|
|
|
|