A030586 Write n in base 6, then complement each digit (d -> 5-d) and juxtapose.

4, 3, 2, 1, 0, 4, 5, 4, 4, 4, 3, 4, 2, 4, 1, 4, 0, 3, 5, 3, 4, 3, 3, 3, 2, 3, 1, 3, 0, 2, 5, 2, 4, 2, 3, 2, 2, 2, 1, 2, 0, 1, 5, 1, 4, 1, 3, 1, 2, 1, 1, 1, 0, 0, 5, 0, 4, 0, 3, 0, 2, 0, 1, 0, 0, 4, 5, 5, 4, 5, 4, 4, 5, 3, 4, 5, 2, 4, 5, 1, 4, 5, 0, 4, 4, 5, 4, 4, 4, 4

Offset

1,1

Links

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

Mathematica

5 - Flatten[IntegerDigits[Range@45, 6]] (* Robert G. Wilson v, Jul 01 2014 *)

Crossrefs

Sequence in context: A071692 A378371 A307335 * A249345 A070635 A110366

Adjacent sequences: A030583 A030584 A030585 * A030587 A030588 A030589

Keyword

nonn,base

Author

Clark Kimberling

Status

approved