login
The OEIS is supported by the many generous donors to the OEIS Foundation.

 

Logo
Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A029518 Numbers k such that k divides the (right) concatenation of all numbers <= k written in base 25 (most significant digit on right). 141
1, 3, 5, 9, 15, 21, 39, 83, 96, 288, 303, 864, 1824, 2421, 2496, 2592, 2817, 3328, 6299, 9440, 13632, 18592, 26049, 64857, 69696, 71904, 79872, 94848, 120384, 258111, 287232, 319319, 476736, 524992, 706368, 904281, 1817583, 2003520, 3156192, 4479904, 7460741 (list; graph; refs; listen; history; text; internal format)
OFFSET
1,2
COMMENTS
This sequence differs from A061954 in that all least significant zeros are kept during concatenation.
LINKS
EXAMPLE
See A029495 for example.
MATHEMATICA
b = 25; c = {}; Select[Range[10^4], Divisible[FromDigits[c = Join[c, Reverse[IntegerDigits[#, b]]], b], #] &] (* Robert Price, Mar 13 2020 *)
PROG
(PARI) lista(nn, m=25) = my(s, t); for(k=1, nn, s=k; while(s, t=t*m+s%m; s\=m); if(t%k==0, print1(k, ", "))); \\ Jinyuan Wang, Dec 05 2020
CROSSREFS
Sequence in context: A182185 A161388 A229552 * A061954 A095039 A022940
KEYWORD
nonn,base
AUTHOR
EXTENSIONS
More terms from Larry Reeves (larryr(AT)acm.org), May 25 2001
Edited and updated by Larry Reeves (larryr(AT)acm.org), Apr 12 2002
a(33) and beyond from Lars Blomberg, Oct 14 2011
STATUS
approved

Lookup | Welcome | Wiki | Register | Music | Plot 2 | Demos | Index | Browse | More | WebCam
Contribute new seq. or comment | Format | Style Sheet | Transforms | Superseeker | Recents
The OEIS Community | Maintained by The OEIS Foundation Inc.

License Agreements, Terms of Use, Privacy Policy. .

Last modified March 18 22:56 EDT 2024. Contains 370952 sequences. (Running on oeis4.)