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, 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

Links

Paolo Xausa, Table of n, a(n) for n = 0..10000

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

Adjacent sequences: A317195 A317196 A317197 * A317199 A317200 A317201

Keyword

sign

Author

N. J. A. Sloane, Aug 05 2018

Status

approved