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

1, 3, 7, 9, 21, 49, 59, 67, 89, 147, 353, 1057, 1773, 4711, 6943, 29691, 40719, 51309, 57533, 116881, 155769, 178311, 207123, 9111701, 9636685, 10090955, 14397327, 21361545, 23023665, 50170565, 55533513, 72268665, 316155105, 635174505, 780744111, 932896685

Offset: 1

Author

Olivier Gérard

Keywords

• nonn
• base

Comments

a(52) > 3*10^10. - Jason Yuen, Jun 30 2024

Links

• Jason Yuen, Table of n, a(n) for n = 1..51
• Index entries for related sequences

Crossrefs

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

Programs

Mathematica

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

Extensions

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

More terms from Larry Reeves (larryr(AT)acm.org), Jun 01 2001

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

a(24)-a(32) from Max Alekseyev, May 15 2011