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,3

Links

Table of n, a(n) for n=0..99.

Example

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

Mathematica

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

Crossrefs

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

Sequence in context: A365381 A161822 A001176 * A348045 A086685 A343998

Adjacent sequences: A136690 A136691 A136692 * A136694 A136695 A136696

Keyword

base,easy,nonn

Author

Carl R. White, Jan 16 2008

Status

approved