A029452 - OEIS

A029452

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

1, 3, 7, 12, 21, 28, 44, 49, 60, 61, 63, 81, 84, 91, 97, 108, 140, 147, 180, 189, 196, 204, 212, 243, 252, 303, 308, 324, 343, 349, 376, 392, 441, 504, 831, 1029, 1057, 1176, 1561, 2401, 2744, 3101, 4312, 5096, 6027, 7203, 8232, 10339, 11669, 12936, 13755

(list; graph; refs; listen; history; text; internal format)

OFFSET

1,2

LINKS

Robert Price, Table of n, a(n) for n = 1..76

MATHEMATICA

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

CROSSREFS

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

Sequence in context: A025582 A247556 A337656 * A367892 A365043 A294422

Adjacent sequences: A029449 A029450 A029451 * A029453 A029454 A029455

KEYWORD

nonn,base

AUTHOR

Olivier Gérard

EXTENSIONS

More terms from David W. Wilson

STATUS

approved