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

1, 13, 19, 37, 128, 640, 1235, 1280, 6086551, 18540032, 23525888, 46727680, 82391552, 120243712, 921891325, 1595132800, 2065529801, 2169770791, 3410636825, 4210023067, 16854254720, 24044950400, 29473137280

Offset

1,2

Comments

No other terms below 3*10^10.

Links

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

Index entries for related sequences

Mathematica

Select[Range[1, 2000], Mod[FromDigits[Flatten[Reverse[Table[IntegerDigits[m, 9], {m, 1, # }]]], 9], # ] == 0 &] (* Peter Bertok, Nov 26 2001 *)

Crossrefs

Cf. A007095.

Sequence in context: A307627 A000922 A107188 * A252021 A216101 A096455

Adjacent sequences: A029475 A029476 A029477 * A029479 A029480 A029481

Keyword

nonn,base,more

Author

Olivier Gérard

Extensions

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

a(9)-a(13) from Max Alekseyev, May 15 2011

a(14)-a(23) from Jason Yuen, May 19 2024

Status

approved