|
| |
|
|
A029466
|
|
Numbers k that divide the (right) concatenation of all numbers <= k written in base 21 (most significant digit on left).
|
|
2
|
|
|
|
1, 3, 5, 7, 15, 21, 25, 35, 45, 48, 49, 63, 75, 79, 80, 105, 112, 144, 147, 175, 203, 225, 240, 245, 295, 315, 327, 336, 369, 400, 441, 525, 560, 675, 720, 735, 784, 805, 945, 1008, 1029, 1113, 1200, 1225, 1267, 1323, 1392, 1575, 1680, 1715, 1953, 2043
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
|
OFFSET
|
1,2
|
|
|
LINKS
|
Robert Price, Table of n, a(n) for n = 1..137
|
|
|
MATHEMATICA
|
b = 21; 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: A356591 A029460 A277910 * A014872 A018501 A014865
Adjacent sequences: A029463 A029464 A029465 * A029467 A029468 A029469
|
|
|
KEYWORD
|
nonn,base
|
|
|
AUTHOR
|
Olivier Gérard
|
|
|
STATUS
|
approved
|
| |
|
|
