|
|
A061961
|
|
Numbers n such that n divides the (left) concatenation of all numbers <= n written in base 8 (most significant digit on right).
(history;
published version)
|
|
|
#16 by N. J. A. Sloane at Mon Mar 09 14:43:02 EDT 2020
|
|
|
|
#15 by Michel Marcus at Mon Mar 09 13:50:48 EDT 2020
|
|
|
|
#14 by Michel Marcus at Mon Mar 09 13:50:12 EDT 2020
|
| COMMENTS
|
No more terms < 10^7. [. [_Lars Blomberg, _, Aug 22 2011]
|
| STATUS
|
proposed
editing
|
|
|
Discussion
|
Mon Mar 09
| 13:50
| Michel Marcus: possible to join lines ?
|
|
|
|
#13 by Robert Price at Mon Mar 09 13:24:51 EDT 2020
|
|
|
|
#12 by Robert Price at Mon Mar 09 13:24:47 EDT 2020
|
| MATHEMATICA
|
b = 8; c = {}; Select[Range[10^4], Divisible[FromDigits[
c = Join[Reverse[IntegerDigits[#, b]], c], b], #] &] (* Robert Price, Mar 09 2020 *)
|
| STATUS
|
approved
editing
|
|
|
|
#11 by Charles R Greathouse IV at Mon Mar 09 11:38:03 EDT 2015
|
| EXTENSIONS
|
Edited and updated by Larry Reeves (larryr(AT)acm.org), Apr 12, 2002
|
|
|
Discussion
|
Mon Mar 09
| 11:38
| OEIS Server: https://oeis.org/edit/global/2363
|
|
|
|
#10 by Russ Cox at Sat Mar 31 10:28:27 EDT 2012
|
| EXTENSIONS
|
a(12)-a(15) from _Lars Blomberg (lars.blomberg(AT)visit.se), _, Aug 22 2011
|
|
|
Discussion
|
Sat Mar 31
| 10:28
| OEIS Server: https://oeis.org/edit/global/546
|
|
|
|
#9 by Joerg Arndt at Mon Aug 22 04:33:36 EDT 2011
|
|
|
|
#8 by Joerg Arndt at Mon Aug 22 04:33:26 EDT 2011
|
| COMMENTS
|
No more terms < 10^7.. [Lars Blomberg, Aug 22 2011]
|
| STATUS
|
proposed
editing
|
|
|
|
#7 by Lars Blomberg at Mon Aug 22 04:25:28 EDT 2011
|
|
|
|