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 A075774 #27 Feb 16 2025 08:32:47 %S A075774 2,1,1,1,1,1,1,2,1,1,1,3,1,2,2,2,2,3,2,2,2,3,3,3,3,3,3,4,3,3,2,3,3,3, %T A075774 3,3,3,4,3,3,2,3,3,3,3,3,3,4,3,3,2,3,3,3,3,3,3,4,3,3,2,3,3,3,3,3,3,4, %U A075774 3,3,3,4,4,4,4,4,4,5,4,4,2,3,3,3,3,3,3,4,3,3,2,3,3,3,3,3,3,4,3,3,3,4,4,4,4 %N A075774 Number of syllables in n in American English. %C A075774 Uses the convention of omitting a trailing 'and', so 101 is 'one hundred one' rather than 'one hundred and one.' - _Eric W. Weisstein_, May 11 2006 %C A075774 From _Michael S. Branicky_, May 28 2024: (Start) %C A075774 The only numbers with a(n) = 1 are 1, 2, 3, 4, 5, 6, 8, 9, 10, 12. %C A075774 The only numbers with a(n) = 2 are 7, 13, 14, 15, 16, 18, 19, 20, 30, 40, 50, 60, 80, 90. %C A075774 Those with a(n) = 3 and 4 are in A372807 and A180961, respectively. (End) %H A075774 Charles R Greathouse IV, <a href="/A075774/b075774.txt">Table of n, a(n) for n = 0..10000</a> %H A075774 Eric Weisstein's World of Mathematics, <a href="https://mathworld.wolfram.com/Number.html">Number</a> %e A075774 a(76)=4 because seventy-six is split sev.en.ty.six, or four syllables. %o A075774 (PARI) A075774(n, t=[10^9, 2, 10^6, 2, 1000, 2, 100, 2])={ n>99 && forstep( i=1, #t, 2, n<t[i] && next; n=divrem(n, t[i]); return( A075774(n[1])+t[i+1]+if( n[2], A075774( n[2] )))); if( n<20, 1+!!setsearch(Set([0,7,13,14,15,16,18,19]),n) + 2*!!setsearch(Set([11,17]),n), 2+(n\10==7) + if(n%10, A075774(n%10)))} \\ The "Set()" is not required in PARI v.2.6+ but we put it for downward compatibility. - _M. F. Hasler_, Nov 03 2013 %o A075774 (Python) %o A075774 def A075774(n): %o A075774 t = [(10**i, 2) for i in [12, 9, 6, 3, 2]] %o A075774 if n > 99: %o A075774 for ti, sti in t: %o A075774 if n >= ti: %o A075774 q, r = divmod(n, ti) %o A075774 return A075774(q) + sti + (A075774(r) if r else 0) %o A075774 if n < 20: %o A075774 return 1 + (n in {0, 7, 13, 14, 15, 16, 18, 19}) + 2*(n in {11, 17}) %o A075774 else: return 2 + (n//10==7) + (A075774(n%10) if n%10 else 0) %o A075774 print([A075774(n) for n in range(105)]) # _Michael S. Branicky_, Jun 27 2021 after _M. F. Hasler_ %Y A075774 Cf. A005589, A052360, A180961, A372807. %K A075774 easy,nonn,word %O A075774 0,1 %A A075774 Ethan B. Trewhitt, Oct 09 2002 %E A075774 More terms from _Eric W. Weisstein_, May 11 2006