A080038 Start with a(1)=3; apply 3 -> 343, 4 -> 3443; iterate.

3, 3, 4, 3, 3, 4, 3, 3, 4, 4, 3, 3, 4, 3, 3, 4, 3, 3, 4, 4, 3, 3, 4, 3, 3, 4, 3, 3, 4, 4, 3, 3, 4, 4, 3, 3, 4, 3, 3, 4, 3, 3, 4, 4, 3, 3, 4, 3, 3, 4, 3, 3, 4, 4, 3, 3, 4, 3, 3, 4, 3, 3, 4, 4, 3, 3, 4, 4, 3, 3, 4, 3, 3, 4, 3, 3, 4, 4, 3, 3, 4, 3, 3, 4, 3, 3, 4, 4, 3, 3, 4, 3, 3, 4, 3, 3, 4, 4, 3, 3, 4, 4, 3, 3, 4

Offset

1,1

Comments

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

Links

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

Example

3 -> 343 -> 3433443343 -> ...

Mathematica

SubstitutionSystem[{3->{3, 4, 3}, 4->{3, 4, 4, 3}}, {3}, {5}][[1]] (* Harvey P. Dale, Jan 01 2024 *)

Crossrefs

Cf. A079000, A079948.

Sequence in context: A005536 A172515 A188590 * A121937 A003034 A091282

Adjacent sequences: A080035 A080036 A080037 * A080039 A080040 A080041

Keyword

easy,nonn

Author

Matthew Vandermast, Mar 14 2003

Status

approved