A029488 - OEIS

%I #21 Jun 30 2024 01:42:54

%S 1,3,9,24,27,40,45,65,72,85,120,135,153,216,221,333,360,440,501,543,

%T 648,1080,1240,1320,2456,2493,3240,3720,3960,4887,5169,5427,6309,6504,

%U 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

%N Numbers k that divide the (left) concatenation of all numbers <= k written in base 19 (most significant digit on left).

%C a(102) > 3*10^10. - _Jason Yuen_, Jun 29 2024

%H Jason Yuen, <a href="/A029488/b029488.txt">Table of n, a(n) for n = 1..101</a>

%t b = 19; c = {}; Select[Range[10^4], Divisible[FromDigits[c = Join[IntegerDigits[#, b], c], b], #] &] (* _Robert Price_, Mar 12 2020 *)

%Y Cf. A029447-A029470, A029471-A029494, A029495-A029518, A029519-A029542, A061931-A061954, A061955-A061978.

%K nonn,base

%O 1,2

%A _Olivier Gérard_

%E More terms from Andrew Gacek (andrew(AT)dgi.net), Feb 21 2000

%E More terms from Larry Reeves (larryr(AT)acm.org), May 24 2001

%E a(47)-a(81) from _Max Alekseyev_, May 16 2011