OFFSET
1,12
COMMENTS
a(p) = 0 for p prime.
FORMULA
a(n) = Sum_{d|n} [Omega(d) = 2] * (ceiling(n/d^2) - floor(n/d^2)), where [ ] is the Iverson bracket.
MATHEMATICA
Table[Count[Select[Divisors[n], PrimeOmega[#]==2&], _?(!IntegerQ[n/#^2]&)], {n, 120}] (* Harvey P. Dale, Aug 10 2023 *)
CROSSREFS
KEYWORD
nonn
AUTHOR
Wesley Ivan Hurt, Jun 19 2021
STATUS
approved