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

1, 23, 49, 73, 79, 91, 97, 139, 349, 511, 529, 553, 577, 20401, 25189, 86227, 92989, 566257, 1321649, 2504263, 11387783, 52584187, 73812233

Offset

1,2

Comments

No other terms below 10^8.

Links

Table of n, a(n) for n=1..23.

Index entries for related sequences

Mathematica

b = 24; c = {}; Select[Range[10^4], Divisible[FromDigits[c = Join[IntegerDigits[#, b], c], b], #] &] (* Robert Price, Mar 12 2020 *)

Crossrefs

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

Sequence in context: A044100 A044481 A132764 * A063321 A176660 A185187

Adjacent sequences: A029490 A029491 A029492 * A029494 A029495 A029496

Keyword

nonn,base,more

Author

Olivier Gérard

Extensions

Edited and updated by Larry Reeves (larryr(AT)acm.org), Apr 12 2002; Aug 25 2002

a(19)-a(23) from Max Alekseyev, May 15 2011

Status

approved