OFFSET
1,6
FORMULA
a(p) = Sum_{d^2|p} omega(p/d^2) = omega(p) = 1 for p prime.
EXAMPLE
a(12) = Sum_{d^2|12} omega(12/d^2) = omega(12) + omega(3) = 2 + 1 = 3.
MATHEMATICA
Table[Sum[PrimeNu[n/k^2] (1 - Ceiling[n/k^2] + Floor[n/k^2]), {k, n}], {n,
100}]
PROG
(PARI) a(n) = sumdiv(n, d, if (issquare(d), omega(n/d))); \\ Michel Marcus, Jun 14 2021
CROSSREFS
KEYWORD
nonn
AUTHOR
Wesley Ivan Hurt, Jun 14 2021
STATUS
approved