A359957 a(n) is the smallest number with exactly n divisors that are greater than or equal to 6.
6, 12, 18, 24, 36, 48, 60, 72, 126, 192, 120, 168, 180, 252, 240, 336, 576, 3072, 360, 504, 1296, 900, 960, 1344, 720, 1008, 840, 1512, 4158, 27027, 1260, 2016, 9702, 63063, 1680, 3024, 2880, 4032, 15360, 3600, 7056, 94864, 2520, 5544, 6480, 9072, 61440, 86016
Offset: 1
Keywords
Programs
-
Mathematica
Table[SelectFirst[Table[{n,Count[Divisors[n],?(#>5&)]},{n,100000}],#[[2]]==k&],{k,50}] [[;;,1]] (* _Harvey P. Dale, Jan 04 2024 *)
-
PARI
a(n) = my(k=1); while (sumdiv(k, d, (d>=6)) != n, k++); k; \\ Michel Marcus, Jan 20 2023