%I #21 Jul 17 2020 05:36:40
%S 96,97,98,99,100,101,102,103,122,139,166,190,233,241,261,268,301,331,
%T 366,380,415,431,445,481,497,514,521,583,596,624,629,634,655,672,690,
%U 716,723,762,789,799,821,833,861,897
%N Numbers k such that k! has initial digit '9'.
%C The asymptotic density of this sequence is log_10(10/9) = 1 - log_10(9) = 0.045757... (A104140) (Kunoff, 1987). - _Amiram Eldar_, Jul 17 2020
%H Chai Wah Wu, <a href="/A045528/b045528.txt">Table of n, a(n) for n = 1..10000</a>
%H Sharon Kunoff, <a href="https://www.fq.math.ca/Scanned/25-4/kunoff.pdf">N! has the first digit property</a>, The Fibonacci Quarterly, Vol. 25, No. 4 (1987), pp. 365-367.
%H <a href="/index/Fa#factorial">Index entries for sequences related to factorial numbers</a>
%F A008905(a(n)) = 9. - _Amiram Eldar_, Jul 17 2020
%e 96 is a term since 96! = 9.916779... * 10^149 has the initial digit 9.
%t Select[ Range[ 900 ], IntegerDigits[ #! ] [ [1] ] == 9 & ]
%o (PARI) isok(n) = digits(n!)[1] == 9; \\ _Michel Marcus_, Feb 08 2017
%Y 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. See also A000142, A008905, A104140.
%K nonn,base
%O 1,1
%A _Jeff Burch_
%E More terms from _Robert G. Wilson v_, Jan 03 2001