login
A029504
Numbers n such that n divides the (right) concatenation of all numbers <= n written in base 11 (most significant digit on right).
1
1, 5, 15, 24, 40, 69, 72, 75, 120, 167, 216, 280, 360, 536, 1192, 1240, 1360, 11280, 25195, 33216, 33984, 101328, 221640, 400479, 531000, 537640, 600104, 631155, 743085, 958785, 2660431, 2777800
OFFSET
1,2
COMMENTS
This sequence differs from A061940 in that all least significant zeros are kept during concatenation.
No more terms < 10^7. - Lars Blomberg, Oct 06 2011
EXAMPLE
See A029495 for example.
MATHEMATICA
b = 11; c = {}; Select[Range[10^4], Divisible[FromDigits[c = Join[c, Reverse[IntegerDigits[#, b]]], b], #] &] (* Robert Price, Mar 12 2020 *)
KEYWORD
nonn,base,more
EXTENSIONS
Edited and updated by Larry Reeves (larryr(AT)acm.org), Apr 12 2002; Aug 25, 2002
a(27)-a(32) from Lars Blomberg, Oct 06 2011
STATUS
approved