The OEIS is supported by the many generous donors to the OEIS Foundation.
Reminder: The OEIS is hiring a new managing editor, and the application deadline is January 26.
Reminder: The OEIS is hiring a new managing editor, and the application deadline is January 26.
%I #6 Aug 07 2019 13:40:52
%S 720,87178291200,6402373705728000,8222838654177922817725562880000000,
%T 608281864034267560872252163321295376887552831379210240000000000,
%U 1124000727777607680000,230843697339241380472092742683027581083278564571807941132288000000000000
%N Smallest factorial containing exactly n 7's.
%e a(2)=87178291200 so 87178291200 is the smallest factorial containing exactly two 7's.
%t With[{f=Range[200]!},Table[SelectFirst[f,DigitCount[#,10,7]==n&],{n,6}]] (* Requires Mathematica version 10 or later *) (* _Harvey P. Dale_, Aug 07 2019 *)
%K base,nonn
%O 1,1
%A _Shyam Sunder Gupta_, Jul 30 2002
%E a(7) from _Harvey P. Dale_, Aug 07 2019