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: A182425 A071692 A307335 * A249345 A070635 A110366

Adjacent sequences: A030583 A030584 A030585 * A030587 A030588 A030589

Keyword

nonn,base

Author

Clark Kimberling

Status

approved