A339584 A ternary sequence: a(n) = 1 if n is in A003156, 2 if n is in A003157, 3 if n is in A003158.

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

Offset

1,2

Comments

This has the same relationship to A003156-A003158 as A092782 does to A003144-A003146.

Links

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

Formula

a(n) = A092606(n) + 1. - John Keith, Dec 28 2020

Mathematica

Nest[Flatten[# /. {1 -> {1, 3, 2}, 2 -> 1, 3 -> 1}] &, {1}, 8] (* John Keith, Dec 28 2020 after Robert G. Wilson v's program for A092782. *)

Crossrefs

Cf. A003156, A003157, A003158; A003144, A003145, A003146, A080843, A092606, A092782.

Sequence in context: A218754 A079948 A257657 * A106689 A348177 A027082

Adjacent sequences: A339581 A339582 A339583 * A339585 A339586 A339587

Keyword

nonn

Author

N. J. A. Sloane, Dec 26 2020

Status

approved