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
Examples
The 3rd pair of twin primes is twin(3) = (11,13), prime(13) = 41, a(3) = 41*13 = 533.
Programs
-
Mathematica
#*Prime[#]&/@(Transpose[Select[Partition[Prime[Range[200]],2,1], Last[#]- First[#] ==2&]][[2]]) (* Harvey P. Dale, Jun 04 2014 *)
Formula
Let prime(i) = i-th prime, let twin(n) = (P, Q) be n-th pair of twin primes; sequence gives prime(Q)*Q.