login
A317198
Yet another version of the ternary tribonacci word: fixed point of the morphism 1 -> 1,0; 0 -> 1,-1; -1 -> 1; starting from a(0) = 1.
1
1, 0, 1, -1, 1, 0, 1, 1, 0, 1, -1, 1, 0, 1, 0, 1, -1, 1, 0, 1, 1, 0, 1, -1, 1, 0, 1, -1, 1, 0, 1, 1, 0, 1, -1, 1, 0, 1, 0, 1, -1, 1, 0, 1, 1, 0, 1, -1, 1, 0, 1, 1, 0, 1, -1, 1, 0, 1, 0, 1, -1, 1, 0, 1, 1, 0, 1, -1, 1, 0, 1, -1, 1, 0, 1, 1, 0, 1, -1, 1, 0, 1, 0, 1, -1, 1, 0, 1, 1, 0, 1, -1, 1, 0, 1, 0, 1, -1, 1, 0, 1, 1, 0, 1
OFFSET
0
MATHEMATICA
Nest[Flatten[ReplaceAll[#, {-1->1, 0->{1, -1}, 1->{1, 0}}]]&, {0}, 10] (* Paolo Xausa, Nov 09 2023 *)
CROSSREFS
Other versions: A080843 (the main version), A092782.
Sequence in context: A355690 A359590 A104521 * A354993 A131379 A359819
KEYWORD
sign
AUTHOR
N. J. A. Sloane, Aug 05 2018
STATUS
approved