A128940 - OEIS

%I #7 Jan 19 2019 04:14:58

%S 47,53,59,151,157,163,167,173,179,251,257,263,257,263,269,367,373,379,

%T 557,563,569,587,593,599,601,607,613,647,653,659,727,733,739,941,947,

%U 953,971,977,983,1097,1103,1109,1117,1123,1129,1181,1187,1193

%N List of triples of primes with common difference 6.

%H Harvey P. Dale, <a href="/A128940/b128940.txt">Table of n, a(n) for n = 0..1001</a>

%e 47, 53, 59

%e 151, 157, 163

%e 167, 173, 179

%e .....

%p for i from 1 by 1 to 400 do if ithprime(i+1) = ithprime(i) + 6 and ithprime(i+2) = ithprime(i) + 12 then print(ithprime(i),ithprime(i+1),ithprime(i+2)); fi; od;

%t Select[Partition[Prime[Range[200]],3,1],Differences[#]=={6,6}&]//Flatten (* _Harvey P. Dale_, Dec 09 2018 *)

%K nonn

%O 0,1

%A _Zerinvary Lajos_, Apr 27 2007