A080701 Product of upper bound twin-prime-indexed primes and their upper bound twin prime.

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

Links

Table of n, a(n) for n=1..30.

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

Cf. A057470, A057473.

Sequence in context: A044242 A044623 A063345 * A208294 A039442 A063324

Adjacent sequences: A080698 A080699 A080700 * A080702 A080703 A080704

Keyword

easy,nonn

Author

Cino Hilliard, Mar 04 2003

Status

approved