login

Year-end appeal: Please make a donation to the OEIS Foundation to support ongoing development and maintenance of the OEIS. We are now in our 61st year, we have over 378,000 sequences, and we’ve reached 11,000 citations (which often say “discovered thanks to the OEIS”).

A029482
Numbers k that divide the (left) concatenation of all numbers <= k written in base 13 (most significant digit on left).
1
1, 3, 9, 15, 21, 35, 53, 64, 105, 192, 320, 448, 576, 960, 1344, 2583, 2611, 2688, 4480, 5760, 8064, 8865, 12160, 13440, 23168, 28413, 131727, 201349, 654231, 901299, 1121799, 2629184, 11874240, 13712832, 35644608, 68560525, 76680065, 79404800, 97064075
OFFSET
1,2
COMMENTS
a(84) > 3*10^10. - Jason Yuen, May 31 2024
MATHEMATICA
b = 13; 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 20 2000
More terms from Larry Reeves (larryr(AT)acm.org), May 24 2001
Edited and updated by Larry Reeves (larryr(AT)acm.org), Apr 12 2002
a(29)-a(39) from Max Alekseyev, May 16 2011
STATUS
approved