A277544 a(n) = n/6^m mod 6, where 6^m is the greatest power of 6 that divides n.

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

Offset

1,2

Comments

a(n) is the rightmost nonzero digit in the base 6 expansion of n.

Links

Clark Kimberling, Table of n, a(n) for n = 1..10000

Formula

a(n) = A244414(n) mod 6. - Michel Marcus, Oct 20 2016

Example

a(8) = (8/6 mod 6) = 2.

Mathematica

Table[Mod[n/6^IntegerExponent[n, 6], 6], {n, 1, 160}]

Prog

(PARI) a(n) = n/6^valuation(n, 6) % 6; \\ Michel Marcus, Oct 20 2016

Crossrefs

Cf. A010875, A244414.

Sequence in context: A117724 A255826 A339256 * A190595 A338863 A280502

Adjacent sequences: A277541 A277542 A277543 * A277545 A277546 A277547

Keyword

nonn,easy

Author

Clark Kimberling, Oct 19 2016

Status

approved