OFFSET
1,1
COMMENTS
Benford's law shows that this sequence will contain about (log 3 - log 2)/log 10 =~ 18% of factorials. [Charles R Greathouse IV, Nov 13 2010]
FORMULA
MATHEMATICA
Select[Range[50]!, IntegerDigits[#][[1]]==2&] (* Harvey P. Dale, Mar 21 2020 *)
PROG
(PARI) lista(nn) = {for (n=1, nn, if (digits(n!)[1] == 2, print1(n!, ", ")); ); } \\ Michel Marcus, Dec 13 2017
CROSSREFS
KEYWORD
nonn,base
AUTHOR
STATUS
approved