A173204 - OEIS

A173204

a(n) is the smallest number which has in its English name the letter "n" in the n-th position beginning the count from the end.

7, 1, 20, 9, 17, 19, 24, 19, 91, 94, 93, 101, 104, 103, 111, 115, 113, 117, 124, 123, 173, 923, 973, 1101, 1104, 1103, 1111, 1115, 1113, 1117, 1124, 1123, 1173, 1323, 1373, 9323, 9373, 17373, 19173, 19323, 19373, 91373, 93323

(list; graph; refs; listen; history; text; internal format)

OFFSET

1,1

LINKS

Table of n, a(n) for n=1..43.

EXAMPLE

a(1) = seveN, a(2) = oNe, a(3) = tweNty, a(4)= Nine, a(5) = seveNteen, etc.

MATHEMATICA

ePos[n_] := Flatten@Position[DeleteCases[Reverse@Characters@IntegerName[n, "Words"], a_ /; MemberQ[{" ", "\[Hyphen]"}, a]], "n"]; t = {}; i = 1; Monitor[Table[Do[If[MemberQ[ePos[i], n], Return[lst = AppendTo[t, i]; i = 1; lst], i++], \[Infinity]], {n, 1, 43, 1}] // Last, {ProgressIndicator[n, {1, 43}], n, i}] (* Robert P. P. McKone, Feb 07 2022 *)

CROSSREFS

Cf. A164791 ("n" in n-th position),.

Cf. A173203 (similar for "e"), A173206 (similar for "t").

Sequence in context: A371835 A195220 A119546 * A229820 A229821 A229822

Adjacent sequences: A173201 A173202 A173203 * A173205 A173206 A173207

KEYWORD

nonn,word

AUTHOR

Claudio Meller, Feb 12 2010

EXTENSIONS

More terms from Robert P. P. McKone, Feb 08 2022

STATUS

approved