%I #5 Nov 21 2013 12:47:25
%S 11,17,41,67,127,191,283,367,563,599,797,877,1087,1171,1217,1447,1523,
%T 1741,1847,2081,2351,2909,3019,3299,3761,4153,4421,4567,4787,4943,
%U 6229,6323,6361,6661,6863,8117,8233,8389,8527,8761,9319,10009,10457,10589
%N Let p(i) =i-th prime, let twin(n) = (P,Q) be n-th pair of twin primes; sequence gives p(Q).
%e The 3rd pair of twin primes is twin(3) = (11,13), so a(3) = p(13) = 41.
%t Prime[#]&/@Transpose[Select[Partition[Prime[Range[300]],2,1], Last[#]- First[#] == 2&]][[2]] (* _Harvey P. Dale_, Nov 29 2011 *)
%Y A057470.
%K nonn
%O 1,1
%A _James A. Sellers_, Sep 11 2000
|