%I #23 Mar 19 2024 12:28:35
%S 1,9,85,708,6635,60640,535534,4737129,43297195,392641522,3536880527,
%T 31067514571,282635824867
%N Count of the first 10^n primes which do not contain the digit 5.
%F a(n) <= 9^n. - _Charles R Greathouse IV_, May 21 2014
%e a(1) = 9 since there are 9 primes in the first 10 (through 29) that do not contain a 5. Namely: 2, 3, 7, 11, 13, 17, 19, 23, 29.
%t Table[Length[Select[Range[10^n], DigitCount[Prime[#], 10, 5] == 0 &]], {n, 0, 5}] (* _Robert Price_, Mar 23 2020 *)
%Y Cf. A231412, A228413-A228421, A097952, A091634-A091643.
%K more,nonn,base,hard
%O 0,2
%A _Robert Price_, Nov 09 2013
%E a(12) from _Lucas A. Brown_, Mar 19 2024
|