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

Author

Clark Kimberling, Oct 19 2016

Keywords

• nonn
• easy

Comments

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

Examples

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

Links

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

Crossrefs

Cf. A010875, A244414.

Programs

Mathematica

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

PARI

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

Formula

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