A032581 Numbers k such that A174141(k) is divisible by k.

1, 2, 3, 4, 5, 6, 7, 8, 9, 15, 105, 150, 213, 318, 321, 426, 534, 639, 642, 747, 750, 855, 963, 1050, 1896, 1941, 2130, 2750, 3180, 3210, 4260, 5340, 6390, 6420, 7470, 7500, 8550, 9630, 12500, 14763, 29921, 54565, 87500, 125000, 604750, 849250

Offset: 1

Author

Patrick De Geest, Apr 15 1998

Keywords

• nonn
• base

Comments

Equivalently, numbers k whose decimal representation, read as a base-25 value and divided by k, yields an integer. - Jon E. Schoenfield, Oct 25 2019

Crossrefs

Cf. A032582, A174141.

Programs

Mathematica

With[{b = 25}, Array[If[Mod[#2, #1] == 0, #1, Nothing] & @@ {#, FromDigits[IntegerDigits[#], b]} &, 10^6]] (* Michael De Vlieger, Oct 06 2019 *)

Extensions

Name clarified and offset changed by Michael De Vlieger, Oct 06 2019