This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.
%I A231789 #8 May 21 2014 17:08:02
%S A231789 3,46,466,5091,54595,614992,6460120,67739219,705998810,7435919752,
%T A231789 76728753676
%N A231789 Count of the first 10^n primes containing at least one 3's digit.
%F A231789 a(n) ~ 10^n. - _Charles R Greathouse IV_, May 21 2014
%e A231789 a(1)=3 because there are 3 primes not greater than 29 (the 10th prime) that contain a 3's digit. Namely: 3, 13, 23.
%t A231789 cnt = 0; Table[Do[p = Prime[k]; If[MemberQ[IntegerDigits[p], 3], cnt++], {k, 10^(n - 1) + 1, 10^n}]; cnt, {n, 5}] (* _T. D. Noe_, Nov 13 2013 *)
%Y A231789 Cf. A231726-A231790, A231792-A231796, A091634-A091643, A231412, A228413-A228421.
%K A231789 nonn,base
%O A231789 1,1
%A A231789 _Robert Price_, Nov 13 2013