A080717 Let S(0) = 1; obtain S(k) from S(k-1) by applying 1 -> 2, 2 -> 31, 3 -> 332; sequence is S(0), S(1), S(2), ...

2, 3, 1, 3, 3, 2, 2, 3, 3, 2, 3, 3, 2, 3, 1, 3, 1, 3, 3, 2, 3, 3, 2, 3, 1, 3, 3, 2, 3, 3, 2, 3, 1, 3, 3, 2, 2, 3, 3, 2, 2, 3, 3, 2, 3, 3, 2, 3, 1, 3, 3, 2, 3, 3, 2, 3, 1, 3, 3, 2, 2, 3, 3, 2, 3, 3, 2, 3, 1, 3, 3, 2, 3, 3, 2, 3, 1, 3, 3, 2, 2, 3, 3, 2, 3, 3, 2, 3, 1, 3, 1, 3, 3, 2, 3, 3, 2, 3, 1, 3, 1, 3, 3, 2, 3

Offset

1,1

Comments

a(n) = A080704(n+1) - A080704(n). Sum of first n terms + 2 = A080704(n+1).

Links

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

Example

2 31 3322 3323323131 ...

Mathematica

Flatten[ Table[ Nest[ Flatten[ # /. {1 -> {2}, 2 -> {3, 1}, 3 -> {3, 3, 2}}] &, {2}, n], {n, 0, 6}]] (* Robert G. Wilson v, May 07 2005 *)

Crossrefs

Sequence in context: A039702 A230294 A104483 * A239214 A200181 A121062

Adjacent sequences: A080714 A080715 A080716 * A080718 A080719 A080720

Keyword

easy,nonn

Author

Matthew Vandermast, Mar 06 2003

Extensions

Edited by Robert G. Wilson v, May 07 2005

Status

approved