A340233 a(n) is the least number with exactly n exponential divisors.
1, 4, 16, 36, 65536, 144, 18446744073709551616, 576, 1296, 589824
Offset: 1
Keywords
Examples
a(2) = 4 since 4 is the least number with 2 exponential divisors, 2 and 4.
Links
- Amiram Eldar, Table of n, a(n) for n = 1..12
- Amiram Eldar, Table of n, a(n) for n = 1..100 (given by prime factorizations)
Crossrefs
Programs
-
Mathematica
f[p_, e_] := DivisorSigma[0, e]; d[1] = 1; d[n_] := Times @@ (f @@@ FactorInteger[n]); max = 6; s = Table[0, {max}]; c = 0; n = 1; While[c < max, i = d[n]; If[i <= max && s[[i]] == 0, c++; s[[i]] = n]; n++]; s (* ineffective for n > 6 *)
Comments