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,4

Links

Table of n, a(n) for n=10..30.

Mathematica

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

Crossrefs

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

Sequence in context: A121924 A241740 A342332 * A186679 A275742 A161496

Adjacent sequences: A225735 A225736 A225737 * A225739 A225740 A225741

Keyword

nonn

Author

T. D. Noe, May 14 2013

Status

approved