cp's OEIS Frontend

This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.

Showing 1-2 of 2 results.

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

Original entry on oeis.org

1, 3, 5, 9, 15, 25, 75, 257, 321, 435, 795, 1285, 2313, 8523, 39759, 60855, 91209, 247875, 251385, 2695341, 5095725, 9529505, 12179807, 12341125, 57965805, 1380206235, 15616692345, 22548618825, 26313971049
Offset: 1

Views

Author

Keywords

Comments

No other terms below 3*10^10.

Examples

			For k=3, we have 321_16 which is 801, and 801 = 3*267.
		

Crossrefs

Programs

  • Mathematica
    b = 16; c = {}; Select[Range[10^4], Divisible[FromDigits[c = Join[IntegerDigits[#, b], c], b], #] &] (* Robert Price, Mar 12 2020 *)

Extensions

More terms from Andrew Gacek (andrew(AT)dgi.net), Feb 21 2000
More terms from Larry Reeves (larryr(AT)acm.org), Aug 27 2001
Edited and updated by Larry Reeves (larryr(AT)acm.org), Apr 12 2002
a(20)-a(25) from Max Alekseyev, May 15 2011
a(26)-a(29) from Jason Yuen, Jun 29 2024

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

Original entry on oeis.org

1, 17, 49, 73, 289, 307, 1297, 3013, 8959, 664831, 1399549, 5122561, 8515193, 11012719, 65998063, 145256891, 294363959, 734746001, 1255837139, 1454498597, 5287956641
Offset: 1

Views

Author

Keywords

Comments

No other terms below 3*10^10.

Crossrefs

Programs

  • Mathematica
    b = 18; c = {}; Select[Range[10^4], Divisible[FromDigits[c = Join[IntegerDigits[#, b], c], b], #] &] (* Robert Price, Mar 12 2020 *)

Extensions

More terms from Andrew Gacek (andrew(AT)dgi.net), Feb 21 2000
a(9) corrected by Larry Reeves (larryr(AT)acm.org), Jan 14 2002
Edited and updated by Larry Reeves (larryr(AT)acm.org), Apr 12 2002
a(10)-a(15) from Max Alekseyev, May 15 2011
a(16)-a(21) from Jason Yuen, Jun 29 2024
Showing 1-2 of 2 results.