login
The OEIS is supported by the many generous donors to the OEIS Foundation.

 

Logo
Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A164791 a(n) is the smallest nonnegative number whose American English name has the letter "n" in the n-th position. 9
9, 1, 9, 20, 7, 11, 15, 13, 17, 47, 27, 77, 109, 120, 107, 111, 115, 113, 117, 147, 127, 177, 327, 377, 1120, 1107, 1111, 1115, 1113, 1117, 1147, 1127, 1177, 1327, 1377, 3327, 3377, 11377, 13327, 13377, 17377, 23327, 23377, 73377, 101377, 103327, 103377 (list; graph; refs; listen; history; text; internal format)
OFFSET
1,1
REFERENCES
GCHQ, The GCHQ Puzzle Book, Penguin, 2016. See page 70.
LINKS
EXAMPLE
a(1)=9 ("Nine"), a(2)=1 ("oNe"), a(3)=9 ("niNe"), a(4)=20 ("tweNty").
PROG
(Python)
from num2words import num2words
from itertools import count, islice
def n2w(n):
return "".join(c for c in num2words(n).replace(" and", "") if c.isalpha())
def a(n):
return next(i for i in count(0) if len(w:=n2w(i))>=n and w[n-1]=="n")
print([a(n) for n in range(1, 41)]) # Michael S. Branicky, Apr 21 2023
(Python) # faster for initial segment of sequence; uses n2w, imports above
def agen(): # generator of terms
adict, n = dict(), 1
for i in count(0):
w = n2w(i)
if "n" in w:
locs = [i+1 for i, c in enumerate(w) if w[i] == "n"]
for v in locs:
if v not in adict: adict[v] = i
while n in adict: yield adict[n]; n += 1
print(list(islice(agen(), 50))) # Michael S. Branicky, Apr 21 2023
CROSSREFS
Cf. A164789 ("o"), A164790 ("e"), A164792 ("t"), A164793 ("i"), A164794 ("f"), A164795 ("h"), A164796 ("r"), A164797 ("u").
Sequence in context: A133919 A145078 A093644 * A107829 A062357 A348974
KEYWORD
nonn,word
AUTHOR
Claudio Meller, Aug 26 2009
EXTENSIONS
a(25) and beyond from Michael S. Branicky, Mar 25 2021
Definition clarified by N. J. A. Sloane, Apr 20 2023. We also need a British English analog of this, just as A362121 is an analog of A164790 (a(13) will be different).
STATUS
approved

Lookup | Welcome | Wiki | Register | Music | Plot 2 | Demos | Index | Browse | More | WebCam
Contribute new seq. or comment | Format | Style Sheet | Transforms | Superseeker | Recents
The OEIS Community | Maintained by The OEIS Foundation Inc.

License Agreements, Terms of Use, Privacy Policy. .

Last modified April 25 08:27 EDT 2024. Contains 371964 sequences. (Running on oeis4.)