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