A055188 Cumulative counting sequence: method A (adjective-before-noun) pairs, starting with 2.

2, 1, 2, 2, 2, 1, 1, 4, 2, 3, 1, 5, 2, 4, 1, 1, 4, 1, 3, 6, 2, 7, 1, 3, 4, 2, 3, 1, 5, 8, 2, 9, 1, 4, 4, 4, 3, 2, 5, 1, 6, 1, 7, 10, 2, 12, 1, 7, 4, 5, 3, 3, 5, 2, 6, 2, 7, 1, 8, 1, 9, 13, 2, 15, 1, 8, 4, 7, 3, 5, 5, 3, 6, 4, 7, 2, 8, 2, 9, 1, 10, 1, 12, 16, 2, 18

Offset

1,1

Comments

Segments (generated as at A217760): 2; 1,2; 2,2,1,1; 4,2,3,1; 5,2,4,1,1,4,1,3; ... The 4th segment is read "4 2's and 3 1's" as a record of what was previously written; 4,2 are adjectives and 2 1 are nouns. Conjecture: every nonnegative integer occurs. - Clark Kimberling, Mar 25 2013

Links

Seiichi Manyama, Table of n, a(n) for n = 1..10000

Example

Write 2, thus having 1 2, thus having 2 2's and 1 1, thus having 4 2's and 3 1's, etc.

Mathematica

s = {2}; Do[s = Flatten[{s, {Count[s, #], #} & /@ DeleteDuplicates[s]}], {14}]; s (* Peter J. C. Moses, Mar 21 2013 *)

Crossrefs

Cf. A217760, A217780.

Sequence in context: A309020 A278495 A254623 * A164885 A084989 A128538

Adjacent sequences: A055185 A055186 A055187 * A055189 A055190 A055191

Keyword

nonn

Author

Clark Kimberling, Apr 27 2000

Status

approved