A178145 6n-1,6n+1, 6n+5, 6n+7 are all primes. That is they are adjacent pairs of twin primes.
1, 2, 17, 32, 137, 247, 312, 347, 542, 577, 942, 1572, 2167, 2607, 2622, 2677, 3007, 3152, 3237, 3502, 3712, 4217, 5287, 5807, 7297, 8557, 9222, 10497, 11202, 11582, 12037, 12877, 13282, 13507, 13787, 14802, 16307, 16522, 16852, 18307, 19422
Offset: 1
Keywords
Links
- Harvey P. Dale, Table of n, a(n) for n = 1..1000
Crossrefs
Cf. A002822
Programs
-
Mathematica
(First[#]+1)/6&/@Select[Partition[Prime[Range[12000]],4,1], Differences[#] == {2,4,2}&] (* Harvey P. Dale, Jan 23 2012 *)
Extensions
Extended by D. S. McNeil, May 23 2010
Comments