|
|
A045510
|
|
Factorials having initial digit '2'.
|
|
19
|
|
|
|
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]
|
|
LINKS
|
|
|
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
|
For factorials with initial digit d (1 <= d <= 9) see A045509, A045510, A045511, A045516, A045517, A045518, A282021, A045519; A045520, A045521, A045522, A045523, A045524, A045525, A045526, A045527, A045528, A045529.
|
|
KEYWORD
|
nonn,base
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|