A379539 a(n) is the (n-1)-st frugal number in base n.
1, 32, 64, 125, 250, 343, 343, 625, 729, 1024, 1849, 2197, 2401, 3125, 4374, 5103, 6250, 7168, 8704, 9477, 11875, 13718, 15379, 17303, 20577, 22627, 24334, 27889, 30613, 32805, 36501, 39601, 45056, 50301, 53125, 59392, 63869, 69169, 75449, 78125, 85169, 89667, 94249
Offset: 2
Crossrefs
Main diagonal of A379538.
Programs
-
Mathematica
Module[{m}, Table[m = 0; Do[While[Total[IntegerLength[Select[Flatten[FactorInteger[++m]], # > 1 &], n]] >= IntegerLength[m, n]], n-1]; m, {n, 2, 45}]]
Comments