A140565 List of prime quartets (k - 7, k - 1, k + 1, k + 7).

5, 11, 13, 19, 23, 29, 31, 37, 53, 59, 61, 67, 263, 269, 271, 277, 563, 569, 571, 577, 593, 599, 601, 607, 1223, 1229, 1231, 1237, 1283, 1289, 1291, 1297, 1613, 1619, 1621, 1627, 2333, 2339, 2341, 2347, 2543, 2549, 2551, 2557, 3533, 3539, 3541, 3547, 4013

Offset: 1

Author

Juri-Stepan Gerasimov, Jul 03 2008

Keywords

• nonn

Examples

			The quartets are: (5, 11, 13, 19), if k=12; (53, 59, 61, 67), if k=60; (67, 71, 73, 79), if k=72; etc.
		

Links

• Harvey P. Dale, Table of n, a(n) for n = 1..1000

Programs

Mathematica

Select[{#,#+6,#+8,#+14}&/@Prime[Range[600]],AllTrue[#,PrimeQ]&]// Flatten (* Requires Mathematica version 10 or later *) (* Harvey P. Dale, Apr 21 2020 *)

Extensions

Corrected (quarted with 23 inserted, quarted with 97 removed, quarted with 593 inserted etc.) by R. J. Mathar, Apr 25 2010