%I #30 Mar 19 2024 12:29:21
%S 1,6,54,532,4675,34425,262549,2051466,16831152,155616459,1529462564,
%T 14830618421,141585123501
%N Count of the first 10^n primes which do not contain the digit 1.
%F a(n) <= 9^n. - _Charles R Greathouse IV_, May 21 2014
%e a(2) = 54 since there are 54 primes less than 541 (the 100th prime) that do not contain a 1. Namely: 2, 3, 5, 7, 23, 29, ..., 523.
%t Table[Length[Select[Range[10^n], DigitCount[Prime[#], 10, 1] == 0 &]], {n, 0, 5}] (* _Robert Price_, Mar 23 2020 *)
%Y Cf. A231412, A228413-A228421, A097952, A091634-A091643.
%K nonn,base,more,hard
%O 0,2
%A _Robert Price_, Nov 09 2013
%E a(12) from _Lucas A. Brown_, Mar 19 2024
|