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.
%I A242898 #17 Jun 30 2020 06:47:58 %S A242898 5,10,13,17,20,24,28,31,34,38,43,47,52,56,61,65,70,73,78,83,87,90,93, %T A242898 96,100,105,110,115,120,123,128,132,136,140,143,148,153,157,160,164, %U A242898 169,172,175,179,184,188,192,197,202,206,209,213,217,222,225,229,233 %N A242898 Cumulative number of letters in decimal expansion of Pi being spoken in English as "Three Point One Four One...". %F A242898 a(n) = 5 + SUM[i=1..n-1] A005589(A000796(i)). %F A242898 a(n) = 5 + SUM[i=1..n-1] A107488(i). %e A242898 a(1) = 5 because "Three" has five letters; %e A242898 a(2) = 10 because "Three Point" has ten letters; %e A242898 a(3) = 13 because "Three Point One" has thirteen letters. %p A242898 A242898 := proc(n) %p A242898 5+add(A052384(i),i=1..n-1) ; %p A242898 end proc: %p A242898 seq(A242898(n),n=1..57) ; # _R. J. Mathar_, Jun 30 2020 %Y A242898 Cf. A000796, A005589, A052384, A107488. %K A242898 nonn,word,easy %O A242898 1,1 %A A242898 _Jonathan Vos Post_, May 25 2014