A136765 -id:A136765 - cp's OEIS frontend

A136757 Leading digit of n! in base 6.

1, 1, 2, 1, 4, 3, 3, 3, 5, 1, 2, 3, 1, 2, 1, 2, 1, 3, 1, 5, 3, 1, 1, 4, 2, 1, 1, 1, 4, 3, 3, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 3, 3, 4, 5, 1, 1, 1, 2, 3, 4, 1, 1, 2, 3, 5, 1, 2, 3, 5, 1, 2, 4, 1, 2, 4, 1, 2, 4, 1, 2, 5, 1, 3, 1, 2, 5, 2, 4, 1, 3, 1, 3, 1, 2, 1, 2, 1, 2, 1, 2, 1, 2, 1, 3, 1, 3, 1, 4, 2

Offset: 0

Carl R. White, Jan 21 2008

			a(10) = 2 as 10! = 205440000_6 which has leading digit 2. - _David A. Corneth_, Jan 15 2021

David A. Corneth, Table of n, a(n) for n = 0..9999

Cf. A000142, A136693, A136754, A136755, A136756, A136758, A136759, A136760, A008905, A136761, A136762, A136763, A136764, A136765, A136766.

Table[First[IntegerDigits[n!,6]],{n,0,100}] (* Harvey P. Dale, Dec 13 2011 *)

A136764 a(n) = leading digit of n! in base 14.

Original entry on oeis.org

1, 1, 2, 6, 1, 8, 3, 1, 1, 9, 6, 5, 4, 4, 4, 4, 5, 6, 8, 10, 1, 1, 2, 4, 7, 13, 1, 3, 6, 1, 2, 4, 10, 1, 4, 11, 2, 5, 1, 2, 8, 1, 5, 1, 3, 11, 2, 9, 2, 7, 1, 7, 1, 7, 2, 7, 2, 9, 2, 11, 3, 1, 4, 1, 7, 2, 11, 3, 1, 6, 2, 11, 4, 1, 8, 3, 1, 6, 2, 1, 6, 2, 1, 6, 2, 1, 7, 3, 1, 9, 4, 2, 13, 6, 3, 1, 9, 4, 2, 1

Offset: 0

Carl R. White, Jan 21 2008

			a(10) = 6 as 10! = 6106640_14 which has leading digit 6. - _David A. Corneth_, Jan 15 2021

David A. Corneth, Table of n, a(n) for n = 0..9999

Cf. A000142, A136700, A136754, A136755, A136756, A136757, A136758, A136759, A136760, A008905, A136761, A136762, A136763, A136765, A136766.

f[n_]:=First[IntegerDigits[n!,14]]; lst={};Do[AppendTo[lst,f[n]],{n,0,2*5!}];lst (* Vladimir Joseph Stephan Orlovsky, Jun 14 2009 *)
Table[IntegerDigits[n!,14][[1]],{n,0,100}] (* Harvey P. Dale, Dec 24 2015 *)

a(n) = digits(n!, 14)[1]; \\ Michel Marcus, Jan 27 2015

cp's OEIS Frontend

A136757 Leading digit of n! in base 6.

Views

Author

Keywords

Examples

Links

Crossrefs

Programs

Mathematica