login
A152275
Number of 3's among the digits of all n-digit primes.
9
1, 8, 66, 602, 5552, 52541, 505880, 4907822, 47923752, 469985783, 4625005356, 45629711436, 451086676886, 4466423651321
OFFSET
1,2
MATHEMATICA
Join[{1}, Table[Count[Flatten[IntegerDigits/@Prime[Range[PrimePi[10^(n-1)]+ 1, PrimePi[10^n]]]], 3], {n, 2, 11}]] (* Harvey P. Dale, Dec 18 2011 *)
KEYWORD
base,nonn
AUTHOR
Jon E. Schoenfield, Dec 01 2008
EXTENSIONS
a(12)-a(14) from Giovanni Resta, Jul 20 2015
STATUS
approved