login
A030399
Write n in base 4, then complement each digit (d -> 3-d) and juxtapose.
1
2, 1, 0, 2, 3, 2, 2, 2, 1, 2, 0, 1, 3, 1, 2, 1, 1, 1, 0, 0, 3, 0, 2, 0, 1, 0, 0, 2, 3, 3, 2, 3, 2, 2, 3, 1, 2, 3, 0, 2, 2, 3, 2, 2, 2, 2, 2, 1, 2, 2, 0, 2, 1, 3, 2, 1, 2, 2, 1, 1, 2, 1, 0, 2, 0, 3, 2, 0, 2, 2, 0, 1, 2, 0, 0, 1, 3, 3, 1, 3, 2, 1, 3, 1, 1, 3, 0, 1, 2, 3
OFFSET
1,1
MATHEMATICA
3 - Flatten[ IntegerDigits[ Range@ 40, 4]] (* Robert G. Wilson v, Jul 01 2014 *)
CROSSREFS
Sequence in context: A325181 A072739 A328699 * A128763 A127597 A167749
KEYWORD
nonn,base
STATUS
approved