A124172 Triangle in which row n contains values from 1 to n in alphabetical order (in English).

1, 1, 2, 1, 3, 2, 4, 1, 3, 2, 5, 4, 1, 3, 2, 5, 4, 1, 6, 3, 2, 5, 4, 1, 7, 6, 3, 2, 8, 5, 4, 1, 7, 6, 3, 2, 8, 5, 4, 9, 1, 7, 6, 3, 2, 8, 5, 4, 9, 1, 7, 6, 10, 3, 2, 8, 11, 5, 4, 9, 1, 7, 6, 10, 3, 2, 8, 11, 5, 4, 9, 1, 7, 6, 10, 3, 12, 2, 8, 11, 5, 4, 9, 1, 7, 6, 10, 13, 3, 12, 2

Offset

1,3

Comments

This is a fractal sequence: if the first instance of each number is deleted, the original sequence is recovered. - Franklin T. Adams-Watters, Nov 24 2013

While it is unlikely to ever make a practical difference, for the sake of definiteness we specify that standard American number names are to be used. - Franklin T. Adams-Watters, Nov 24 2013

For 100th row, "one"=50th value and "one hundred"=51st value, placing the extremes in the center. - Peter Woodward, Jun 27 2015

Links

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

Example

Triangle begins:
1,
1,2,
1,3,2,
4,1,3,2
5,4,1,3,2
5,4,1,6,3,2,
...

Mathematica

names = {"one", "two", "three", "four", "five", "six", "seven", "eight", "nine", "ten", "eleven", "twelve", "thirteen"}; Flatten[Table[Table[Position[names, Sort[Take[names, n]][[i]], 1, 1][[1, 1]], {i, n}], {n, Length[names]}]] (* T. D. Noe, Nov 25 2013 *)

Crossrefs

Cf. A002260.

Sequence in context: A332899 A331521 A244967 * A349191 A336394 A336472

Adjacent sequences: A124169 A124170 A124171 * A124173 A124174 A124175

Keyword

nonn,tabl,word

Author

Colm Mulcahy, Dec 05 2006

Extensions

Edited name and more terms from Franklin T. Adams-Watters, Nov 24 2013

Status

approved