|
|
A231789
|
|
Count of the first 10^n primes containing at least one 3's digit.
|
|
0
|
|
|
3, 46, 466, 5091, 54595, 614992, 6460120, 67739219, 705998810, 7435919752, 76728753676
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,1
|
|
LINKS
|
|
|
FORMULA
|
|
|
EXAMPLE
|
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.
|
|
MATHEMATICA
|
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 *)
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn,base
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|