A136693 Final nonzero digit of n! in base 6.

1, 1, 2, 1, 4, 2, 2, 2, 4, 4, 4, 2, 4, 4, 2, 2, 2, 4, 2, 2, 4, 2, 2, 4, 4, 4, 2, 4, 4, 2, 4, 4, 2, 2, 2, 4, 4, 4, 2, 4, 4, 2, 2, 2, 4, 2, 2, 4, 2, 2, 4, 4, 4, 2, 2, 2, 4, 2, 2, 4, 4, 4, 2, 2, 2, 4, 2, 2, 4, 4, 4, 2, 4, 4, 2, 4, 4, 2, 2, 2, 4, 4, 4, 2, 4, 4, 2, 2, 2, 4, 4, 4, 2, 4, 4, 2, 2, 2, 4, 2

Offset: 0

Author

Carl R. White, Jan 16 2008

Keywords

• base
• easy
• nonn

Examples

			6! = 720 decimal = 3200 senary, so a(6) = 2.
		

Crossrefs

Cf. A000142, A136690, A136691, A136692, A136694, A136695, A136696, A008904, A136697, A136698, A136699, A136700, A136701, A136702.

Programs

Mathematica

nzd6[n_]:=Module[{c=IntegerExponent[n!,6]},IntegerDigits[n!,6] [[-(c+1)]]]; Array[nzd6,100,0] (* Harvey P. Dale, Sep 02 2015 *)