Добавлю, доказательства теоремы и не требуется, 16-tuplet-ы найдены прямым перебором во множестве, три наименьших (найдены в 1996-1997 годах) начинаются с: 47710850533373130107, 347709450746519734877, 695874886175252911063.
Но это ведь не КПППЧ, если WolframAlpha не врёт:
Код:
Select[Range[0,60],PrimeQ[47710850533373130107+#]&]
{0, 2, 6, 12, 14, 20, 26, 30, 32, 36, 42, 44, 50, 54, 56, 60}
Select[Range[0,60],PrimeQ[347709450746519734877+#]&]
{0, 2, 6, 12, 14, 20, 26, 30, 32, 36, 42, 44, 50, 54, 56, 60}
Select[Range[0,60],PrimeQ[695874886175252911063+#]&]
{0, 4, 6, 10, 16, 18, 24, 28, 30, 34, 40, 46, 48, 54, 58, 60}
А мы вроде говорили о КПППЧ.