OFFSET
1,2
LINKS
Clark Kimberling, Table of n, a(n) for n = 1..10000
EXAMPLE
a(10) counts these 6 divisors: 1,2,4,5,8,10.
MATHEMATICA
Table[Length[Select[Divisors[n^3], # <= n &]], {n, 1, 120}]
PROG
(PARI) a(n) = sumdiv(n^3, d, d <= n); \\ Michel Marcus, Apr 22 2019
CROSSREFS
KEYWORD
nonn,easy
AUTHOR
Clark Kimberling, Apr 21 2019
STATUS
approved