login
A030351
Write n in base 3, then complement each digit (d -> 2-d) and juxtapose.
1
1, 0, 1, 2, 1, 1, 1, 0, 0, 2, 0, 1, 0, 0, 1, 2, 2, 1, 2, 1, 1, 2, 0, 1, 1, 2, 1, 1, 1, 1, 1, 0, 1, 0, 2, 1, 0, 1, 1, 0, 0, 0, 2, 2, 0, 2, 1, 0, 2, 0, 0, 1, 2, 0, 1, 1, 0, 1, 0, 0, 0, 2, 0, 0, 1, 0, 0, 0, 1, 2, 2, 2, 1, 2, 2, 1, 1, 2, 2, 0, 1, 2, 1, 2, 1, 2, 1, 1, 1, 2
OFFSET
1,4
MATHEMATICA
2 - Flatten[IntegerDigits[Range@35, 3]] (* Robert G. Wilson v, Jul 01 2014 *)
CROSSREFS
Sequence in context: A068462 A369596 A054973 * A257994 A188921 A334568
KEYWORD
nonn,base
STATUS
approved