

A061978


Numbers n such that n divides the (left) concatenation of all numbers <= n written in base 25 (most significant digit on right).


142



1, 3, 9, 21, 33, 57, 96, 864, 1033, 1661, 6449, 6624, 10464, 68249, 81664, 108981, 164384, 167571, 234311, 2420409, 5490464
(list;
graph;
refs;
listen;
history;
text;
internal format)



OFFSET

1,2


COMMENTS

This sequence differs from A029542 in that all least significant zeros are kept during concatenation.
No more terms < 7*10^6.


LINKS



EXAMPLE



MATHEMATICA

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


CROSSREFS



KEYWORD

nonn,base,more


AUTHOR

Larry Reeves (larryr(AT)acm.org), May 24 2001


EXTENSIONS

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


STATUS

approved



