|
| |
|
|
A136760
|
|
Leading digit of n! in base 9.
|
|
13
| |
|
|
1, 1, 2, 6, 2, 1, 8, 6, 6, 6, 6, 8, 1, 1, 2, 4, 8, 1, 3, 7, 1, 4, 1, 2, 7, 2, 6, 2, 7, 2, 8, 3, 1, 4, 1, 7, 3, 1, 6, 3, 1, 7, 3, 1, 1, 5, 3, 1, 1, 5, 3, 2, 1, 8, 5, 3, 2, 1, 1, 8, 6, 4, 3, 2, 2, 1, 1, 1, 1, 7, 6, 6, 5, 4, 4, 4, 3, 3, 3, 3, 3, 3, 3, 3, 3, 3, 4, 4, 4, 5, 5, 6, 7, 8, 1, 1, 1, 1, 2, 2
(list; graph; refs; listen; history; internal format)
|
|
|
|
OFFSET
| 0,3
|
|
|
MATHEMATICA
| f[n_]:=First[IntegerDigits[n!, 9]]; lst={}; Do[AppendTo[lst, f[n]], {n, 0, 2*5!}]; lst [From Vladimir Orlovsky (4vladimir(AT)gmail.com), Jun 14 2009]
|
|
|
CROSSREFS
| Cf. A000142, A136696, A136754, A136755, A136756, A136757, A136758, A136759, A008905, A136761, A136762, A136763, A136764, A136765, A136766.
Sequence in context: A082516 A204935 A008905 * A062539 A171898 A110218
Adjacent sequences: A136757 A136758 A136759 * A136761 A136762 A136763
|
|
|
KEYWORD
| base,easy,nonn
|
|
|
AUTHOR
| Carl R. White (oeisfan(AT)phodd.net), Jan 21 2008
|
| |
|
|
