|
|
A049035
|
|
Number of pairs of twin primes whose smaller element is <= 10^n-th prime.
|
|
1
|
|
|
5, 25, 174, 1270, 10250, 86027, 738597, 6497407, 58047180, 524733511, 4789919653, 44073509102
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,1
|
|
COMMENTS
|
|
|
LINKS
|
|
|
EXAMPLE
|
a(1) = 5 since the 10th prime is 29 and the first 5 twin primes are {3,5}, {5,7}, {11,13}, {17,19} and {29,31}.
|
|
PROG
|
(Python)
from sympy import prime, sieve # use primerange for larger terms
def afind(terms):
c, prevp = 0, 1
for n in range(1, terms+1):
for p in sieve.primerange(prevp+1, prime(10**n)+3):
if prevp == p - 2: c += 1
prevp = p
print(c, end=", ")
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn,more
|
|
AUTHOR
|
Dennis S. Kluk (mathemagician(AT)ameritech.net)
|
|
EXTENSIONS
|
|
|
STATUS
|
approved
|
|
|
|