A225738 Number of numbers k such that k < d(k)^(n/10), where d(k) is the number of divisors of k.

0, 1, 1, 3, 4, 4, 7, 14, 21, 29, 52, 89, 155, 284, 528, 1018, 2046, 4282, 9272, 21466, 50967

Offset: 10

Author

T. D. Noe, May 14 2013

Keywords

• nonn

Crossrefs

Cf. A034884 (n < d(n)^2), A056757 (n < d(n)^3), A225729-A225737.

Programs

Mathematica

Table[f = 0; Do[If[k < DivisorSigma[0, k]^(n/10), f++], {k, 10^4}]; f, {n, 10, 20}]