login
A029488
Numbers k that divide the (left) concatenation of all numbers <= k written in base 19 (most significant digit on left).
2
1, 3, 9, 24, 27, 40, 45, 65, 72, 85, 120, 135, 153, 216, 221, 333, 360, 440, 501, 543, 648, 1080, 1240, 1320, 2456, 2493, 3240, 3720, 3960, 4887, 5169, 5427, 6309, 6504, 6981, 7440, 9360, 10320, 11583, 12555, 14391, 16848, 18135, 18255, 22320, 28080, 28183, 28629, 37360, 38313, 51795, 52545, 54405, 59985, 66960, 84240, 89415, 96720, 101520, 118989, 152784, 925520, 3899205, 4756545, 6259240, 9604872, 13659624, 14446344, 17753256, 17784920, 18694341, 19484440, 20518065, 21377495, 23876424, 31787080, 36603495, 60454107, 80052861, 95747177, 98872632
OFFSET
1,2
COMMENTS
a(102) > 3*10^10. - Jason Yuen, Jun 29 2024
MATHEMATICA
b = 19; c = {}; Select[Range[10^4], Divisible[FromDigits[c = Join[IntegerDigits[#, b], c], b], #] &] (* Robert Price, Mar 12 2020 *)
KEYWORD
nonn,base
EXTENSIONS
More terms from Andrew Gacek (andrew(AT)dgi.net), Feb 21 2000
More terms from Larry Reeves (larryr(AT)acm.org), May 24 2001
a(47)-a(81) from Max Alekseyev, May 16 2011
STATUS
approved