A225732 Numbers n such that n < d(n)^(24/10), where d(n) is the number of divisors of n.
2, 3, 4, 5, 6, 8, 9, 10, 12, 14, 15, 16, 18, 20, 21, 22, 24, 26, 27, 28, 30, 32, 36, 40, 42, 44, 45, 48, 50, 52, 54, 56, 60, 63, 64, 66, 68, 70, 72, 78, 80, 84, 88, 90, 96, 100, 102, 104, 105, 108, 110, 112, 114, 120, 126, 128, 130, 132, 135, 136, 138, 140
Offset: 1
Links
- T. D. Noe, Table of n, a(n) for n = 1..528 (complete sequence)
Crossrefs
Programs
-
Mathematica
t = {}; Do[If[n < DivisorSigma[0, n]^(24/10), AppendTo[t, n]], {n, 10^6}]; t
Comments