A072240 Smallest factorial containing exactly n 6's.

6, 1307674368000, 25852016738884976640000, 403291461126605635584000000, 263130836933693530167218012160000000, 33452526613163807108170062053440751665152000000000, 10333147966386144929666651337523200000000

Offset

1,1

Links

Table of n, a(n) for n=1..7.

Example

a(2)=1307674368000 so 1307674368000 is the smallest factorial containing exactly two 6's.

Mathematica

With[{f=Range[300]!}, Table[SelectFirst[f, DigitCount[#, 10, 6]==n&], {n, 10}]] (* The program uses the SelectFirst function from Mathematica version 10 *) (* Harvey P. Dale, May 23 2015 *)

Crossrefs

Sequence in context: A045518 A058457 A182794 * A182795 A182796 A079683

Adjacent sequences: A072237 A072238 A072239 * A072241 A072242 A072243

Keyword

base,nonn

Author

Shyam Sunder Gupta, Jul 30 2002

Extensions

One additional term (a(7)) from Harvey P. Dale, May 23 2015

Status

approved