[go: up one dir, main page]

login
A182698
a(n) is the largest 5-digit number with exactly n divisors, or a(n) = 0 if no such number exists.
2
0, 99991, 97969, 99998, 83521, 99997, 15625, 99995, 98596, 99952, 59049, 99999, 0, 99873, 99856, 99992, 65536, 99972, 0, 99984, 88209, 99328, 0, 99996, 50625, 94208, 96100, 99904, 0, 99568, 0, 99968, 50176, 0, 40000, 99936, 0, 0, 36864, 99760, 0, 99648, 0
OFFSET
1,2
LINKS
FORMULA
A000005(a(n)) = n for a(n) > 0.
128 = max n such that a(n) > 0, a(n) = 0 for n > 128.
a(n) >= A182697(n).
MATHEMATICA
With[{nd=Table[{n, DivisorSigma[0, n]}, {n, 99999, 10000, -1}]}, Table[ SelectFirst[ nd, #[[2]]==k&], {k, 50}]][[All, 1]]/."NotFound"->0 (* Requires Mathematica version 10 or later *) (* Harvey P. Dale, Mar 13 2018 *)
CROSSREFS
Cf. A182697.
Sequence in context: A032428 A370795 A204523 * A033427 A027663 A168652
KEYWORD
nonn,base
AUTHOR
Jaroslav Krizek, Nov 27 2010
STATUS
approved