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.

A107488 Number of letters in the words formed by the digital recitation of Pi in the English language.

Original entry on oeis.org

5, 3, 4, 3, 4, 4, 3, 3, 4, 5, 4, 5, 4, 5, 4, 5, 3, 5, 5, 4, 3, 3, 3, 4, 5, 5, 5, 5, 3, 5, 4, 4, 4, 3, 5, 5, 4, 3, 4, 5, 3, 3, 4, 5, 4, 4, 5, 5, 4, 3, 4, 4, 5, 3, 4, 4, 5, 4, 4, 4, 4, 4, 4, 3, 5, 4, 5, 5, 3, 3, 4, 4, 3, 3, 5, 3, 3, 4, 5, 4, 4, 5, 3, 3, 5, 4, 5, 4, 5, 3, 4, 5, 4, 3, 3, 3, 5, 4, 3, 5, 4, 5, 3, 3, 4
Offset: 1

Views

Author

Cino Hilliard, May 28 2005

Keywords

Comments

Essentially the same as A052384. [From R. J. Mathar, Aug 24 2008]

Examples

			Three, one, four, one, five, nine has digit count 5, 3, 4, 3, 4, 4 the first 6 entries in the sequence.
		

Programs

  • Mathematica
    RealDigits[Pi,10,120][[1]]/.{0->4,1->3,2->3,3->5,5->4,6->3,7->5,8->5,9->4} (* Harvey P. Dale, Nov 04 2021 *)
  • PARI
    readpi(n) = { local(x,a,d); default(realprecision,200); d=vector(10); a=vector(n); d[1]=4;d[2]=3;d[3]=3;d[4]=5;d[5]=4;d[6]=4;d[7]=3;d[8]=5;d[9]=5;d[10]=4; a=Vec(Str(Pi)); print1(5","); for(x=3,n-1, y=floor(eval(a[x])); print1(d[y+1]",") ) }

A242898 Cumulative number of letters in decimal expansion of Pi being spoken in English as "Three Point One Four One...".

Original entry on oeis.org

5, 10, 13, 17, 20, 24, 28, 31, 34, 38, 43, 47, 52, 56, 61, 65, 70, 73, 78, 83, 87, 90, 93, 96, 100, 105, 110, 115, 120, 123, 128, 132, 136, 140, 143, 148, 153, 157, 160, 164, 169, 172, 175, 179, 184, 188, 192, 197, 202, 206, 209, 213, 217, 222, 225, 229, 233
Offset: 1

Views

Author

Jonathan Vos Post, May 25 2014

Keywords

Examples

			a(1) = 5 because "Three" has five letters;
a(2) = 10 because "Three Point" has ten letters;
a(3) = 13 because "Three Point One" has thirteen letters.
		

Crossrefs

Programs

Formula

a(n) = 5 + SUM[i=1..n-1] A005589(A000796(i)).
a(n) = 5 + SUM[i=1..n-1] A107488(i).
Showing 1-2 of 2 results.