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.

Previous Showing 21-23 of 23 results.

A055063 Positions of primes in A054636 with offset 1.

Original entry on oeis.org

3, 9, 10, 12, 18, 29, 30, 39, 61, 63, 68, 81, 87, 93, 108, 114, 116, 121, 122, 123, 135, 148, 152, 157, 167, 178, 181, 190, 200, 203, 210, 217, 226, 239, 241, 248, 253, 274, 279, 292, 301, 304, 311, 319, 320, 322, 323, 334, 335, 340, 343, 347, 352, 355, 359
Offset: 1

Views

Author

Patrick De Geest, Apr 15 2000

Keywords

Comments

Original name with typo corrected: Pointers to base-8 digits where primes occur in A055062.

Examples

			012345671011121314151617202122232425...
--|...... sum 0+1+2 = prime 3 at position 3
--------| sum 0+1+2+3+4+5+6+7+1 = prime 29 at position 9
		

Crossrefs

Programs

Extensions

Revised by Sean A. Irvine, Mar 09 2022

A055149 The first n digits of the juxtaposition of the base-8 numbers converted to decimal.

Original entry on oeis.org

1, 10, 83, 668, 5349, 42798, 342391, 2739129, 21913032, 175304257, 1402434057, 11219472457, 89755779658, 718046237265, 5744369898123, 45954959184985, 367639673479884, 2941117387839073, 23528939102712589, 188231512821700713
Offset: 1

Views

Author

Patrick De Geest, Apr 15 2000

Keywords

Examples

			1 (1); 12 (10); 123 (83); 1234 (668); 12345 (5349); 123456 (42798); ...
		

Crossrefs

Programs

  • Mathematica
    nn=30;With[{b8=Flatten[IntegerDigits[Range[nn],8]]},Table[ FromDigits[ Take[ b8,n],8],{n,nn}]] (* Harvey P. Dale, Jul 12 2014 *)

A275993 Champernowne sequence: write n in base 16 and juxtapose.

Original entry on oeis.org

0, 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13, 14, 15, 1, 0, 1, 1, 1, 2, 1, 3, 1, 4, 1, 5, 1, 6, 1, 7, 1, 8, 1, 9, 1, 10, 1, 11, 1, 12, 1, 13, 1, 14, 1, 15, 2, 0, 2, 1, 2, 2, 2, 3, 2, 4, 2, 5, 2, 6, 2, 7, 2, 8, 2, 9, 2, 10, 2, 11, 2, 12, 2, 13, 2, 14, 2, 15, 3, 0, 3, 1, 3, 2, 3, 3, 3, 4, 3, 5, 3, 6, 3, 7, 3, 8, 3, 9, 3, 10, 3, 11, 3
Offset: 0

Views

Author

Robert G. Wilson v, Aug 15 2016

Keywords

Comments

10 -> A, 11 -> B, 12 -> C, 13 -> D, 14 -> E & 15 -> F.

Crossrefs

Tables in which the n-th row lists the base b digits of n: A030190 and A030302 (b=2), A003137 and A054635 (b=3), A030373 (b=4), A031219 (b=5), A030548 (b=6), A030998 (b=7), A031035 and A054634 (b=8), A031076 (b=9), A007376 and A033307 (b=10).

Programs

  • Mathematica
    almostNatural[n_, b_] := Block[{m = 0, d = n, i = 1, l, p}, While[m <= d, l = m; m = (b -1) i*b^(i -1) + l; i++]; i--; p = Mod[d -l, i]; q = Floor[(d -l)/i] + b^(i -1); If[p != 0, IntegerDigits[q, b][[p]], Mod[q -1, b]]]; Array[ almostNatural[#, 16] &, 105, 0]
    First[RealDigits[ChampernowneNumber[16], 16, 100, 0]] (* Paolo Xausa, Jun 21 2024 *)
Previous Showing 21-23 of 23 results.