OFFSET
1,4
MATHEMATICA
Table[Sum[PrimePi[k - 1] Ceiling[n/k], {k, 2, n}], {n, 100}]
CROSSREFS
KEYWORD
nonn,easy
AUTHOR
Wesley Ivan Hurt, Dec 31 2023
STATUS
approved