login
A080701
Product of upper bound twin-prime-indexed primes and their upper bound twin prime.
0
55, 119, 533, 1273, 3937, 8213, 17263, 26791, 57989, 65291, 110783, 132427, 196747, 226003, 242183, 331363, 367043, 471811, 522701, 651353, 820499, 1224689, 1307227, 1527437, 1967003, 2371363, 2657021, 2826973, 3078041, 3267323
OFFSET
1,1
FORMULA
Let prime(i) = i-th prime, let twin(n) = (P, Q) be n-th pair of twin primes; sequence gives prime(Q)*Q.
EXAMPLE
The 3rd pair of twin primes is twin(3) = (11,13), prime(13) = 41, a(3) = 41*13 = 533.
MATHEMATICA
#*Prime[#]&/@(Transpose[Select[Partition[Prime[Range[200]], 2, 1], Last[#]- First[#] ==2&]][[2]]) (* Harvey P. Dale, Jun 04 2014 *)
CROSSREFS
Sequence in context: A044242 A044623 A063345 * A208294 A039442 A063324
KEYWORD
easy,nonn
AUTHOR
Cino Hilliard, Mar 04 2003
STATUS
approved