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