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-3 of 3 results.

A107117 Three-digit numbers from the decimal expansion of Pi (version 2).

Original entry on oeis.org

314, 415, 592, 265, 535, 589, 979, 932, 238, 846, 626, 643, 338, 832, 279, 950, 28, 884, 419, 971, 169, 939, 993, 375, 510, 58, 820, 97, 749, 944, 459, 923, 307, 781, 164, 406, 628, 862, 208, 899, 986, 628, 803, 348, 825, 534, 421, 117, 706, 679, 982, 214, 480, 86
Offset: 1

Views

Author

Zak Seidov, May 12 2005

Keywords

Comments

Partition of decimal expansion of Pi into overlapping sublists of length 3.

Crossrefs

Programs

  • Mathematica
    Table[FromDigits[Partition[RealDigits[N[Pi, 201]][[1]], 3, 2][[i]]], {i, 67}]
    FromDigits/@Partition[RealDigits[Pi,10,111][[1]],3,2] (* Harvey P. Dale, Jul 31 2025 *)

A107116 Three-digit numbers from the decimal expansion of Pi (version 1).

Original entry on oeis.org

314, 141, 415, 159, 592, 926, 265, 653, 535, 358, 589, 897, 979, 793, 932, 323, 238, 384, 846, 462, 626, 264, 643, 433, 338, 383, 832, 327, 279, 795, 950, 502, 28, 288, 884, 841, 419, 197, 971, 716, 169, 693, 939, 399, 993, 937, 375, 751, 510, 105, 58, 582, 820, 209, 97, 974, 749, 494, 944, 445, 459, 592
Offset: 1

Views

Author

Zak Seidov, May 12 2005

Keywords

Comments

Partition of decimal expansion of Pi into overlapping sublists of length 3.

Crossrefs

Programs

  • Mathematica
    Table[FromDigits[Partition[RealDigits[N[Pi, 201]][[1]], 3, 1][[i]]], {i, 67}]

A329368 Partition the decimal expansion of Pi into non-overlapping strings of length 10: 3141592653, 5897932384,..; a(n) is the position of the strings where digits are different from each other.

Original entry on oeis.org

7, 548, 3113, 11665, 11728, 14305, 15762, 19177, 23288, 28259, 35603, 37613, 40595, 40740, 41477, 52108, 54085, 54367, 62272, 74856, 75082, 75178, 82919, 83591, 92284, 94936, 103849, 105419, 105832, 108875, 111962, 115152, 117919, 118976, 121112, 124121, 128505
Offset: 1

Views

Author

XU Pingya, Apr 27 2020

Keywords

Examples

			a(1) = 7, because such a string first occur at the 7th string: 4592307816 (i.e., 61-70 digits of Pi).
		

References

  • David Blatner, The Joy of Pi, Walker and Co., NY, 1997; page 91.

Crossrefs

Programs

  • Mathematica
    q[i_]:=q[i]=Take[RealDigits[Pi,10,10i][[1]],-10];
    a={}; Do[If[Length@Union@q[i]==10, AppendTo[a,i]], {i,130000}]
    a
Showing 1-3 of 3 results.