|
Search: id:A124060
|
|
|
| A124060 |
|
T totaler sequence. Counts of the number of t's in the American spelling of numbers. |
|
+0
1
|
|
| 0, 0, 1, 1, 0, 0, 0, 0, 1, 0, 1, 0, 1, 2, 1, 1, 1, 1, 1, 1, 2, 2, 3, 3, 2, 2, 2, 2, 3, 2, 2, 2, 3, 3, 2, 2, 2, 2, 3, 2, 1, 1, 2, 2, 1, 1, 1, 1, 2, 1, 1
(list; graph; listen)
|
|
|
OFFSET
|
1,14
|
|
|
PROGRAM
|
(PARI) total(n) = { local(a, i, j, sumt); a=["zero", "one", "two", "three", "four", "five", "six", "seven", "eight", "nine", "ten", "eleven", "twelve", "thirteen", "fourteen", "fifteen", "sixteen", "seventeen", "eghteen", "nineteen", "twenty", "twentyone", "twentytwo", "twentythree", "twentyfour", "twentyfive", "twentysix", "twentyseven", "twentyeight", "twentynine", "thirty", "thirtyone", "thirtytwo", "thirtythree", "thirtyfour", "thirtyfive", "thirtysix", "thirtyseven", "thirtyeight", "thirtynine", "forty", "fortyone", "fortytwo", "fortythree", "fortyfour", "fortyfive", "fortysix", "fortyseven", "fortyeight", "fortynine", "fifty"]; for(i = 1, n, sumt=0; for(j=1, length(a[i]), if(mid(a[i], j, 1)=="t", sumt++) ); print1(sumt", ") ) } mid(str, s, n) = \ Get a substring of length n from string str starting at position s in str. { local(v, ln, x, tmp); v =""; tmp = Vec(str); ln=length(tmp); for(x=s, s+n-1, v=concat(v, tmp[x]); ); return(v) }
|
|
CROSSREFS
|
Sequence in context: A047072 A053258 A053632 this_sequence A140194 A159923 A003989
Adjacent sequences: A124057 A124058 A124059 this_sequence A124061 A124062 A124063
|
|
KEYWORD
|
nonn,word
|
|
AUTHOR
|
Cino Hilliard (hillcino368(AT)gmail.com), Nov 03 2006
|
|
|
Search completed in 0.002 seconds
|
