Ещё одна центральная 9-ка для паттерна с диаметром 396, найдена на Ахиллесе незадолго до зависания, успела скопировать

(22:54) gp > \r d396_9ki.txt
   logfile = "rez_d396_9ki.txt"
range of search
500202000001 (p=4851804337389699690 )
500222000000 (p=4851998331180000000 )
4851932587405622351, 4851932587405622387, 4851932587405622417, 48519325874056224
29, 4851932587405622489, 4851932587405622549, 4851932587405622561, 4851932587405
622591, 4851932587405622627,
4851932587405622291,
4851932587405622293,
4851932587405622351,
4851932587405622387,
4851932587405622417,
4851932587405622429,
4851932587405622489,
4851932587405622549,
4851932587405622561,
4851932587405622591,
4851932587405622627,
4851932587405622647,
4851932587405622657,
4851932587405622683,

4851932587405622291, 4851932587405622297, 4851932587405622309, 4851932587405622321, 4851932587405622339,
4851932587405622351, 4851932587405622387, 4851932587405622417, 4851932587405622429, 4851932587405622489,
4851932587405622549, 4851932587405622561, 4851932587405622591, 4851932587405622627, 4851932587405622639,
4851932587405622657, 4851932587405622669, 4851932587405622681, 4851932587405622687,

Эта 9-ка не продолжается даже до 11-ки ни в какую сторону.

Это новые вписанные 19-ки в алгоритме №3 (512 формул)

9 «дырок»

{4854679743883263761, 4854679743883263773, 4854679743883263779, 4854679743883263803, 4854679743883263809,
4854679743883263863, 4854679743883263893, 4854679743883263911, 4854679743883263929, 4854679743883263941,
4854679743883263953, 4854679743883263971, 4854679743883263989, 4854679743883264019, 4854679743883264073,
4854679743883264079, 4854679743883264103, 4854679743883264109, 4854679743883264121}

4854679743883263761,
4854679743883263773,
4854679743883263793,
4854679743883263797,
4854679743883263803,
4854679743883263851,
4854679743883263907,
4854679743883263911,
4854679743883263929,
4854679743883263941,
4854679743883263953,
4854679743883263971,
4854679743883263989,
4854679743883264021,
4854679743883264039,
4854679743883264049,
4854679743883264091,
4854679743883264109,
4854679743883264121,

Паттерн с диаметром 360.

9 «дырок»

{4854679743883263761, 4854679743883263773, 4854679743883263779, 4854679743883263803, 4854679743883263809, 
4854679743883263869, 4854679743883263893, 4854679743883263911, 4854679743883263929, 4854679743883263941,
4854679743883263953, 4854679743883263971, 4854679743883263989, 4854679743883264013, 4854679743883264073,
4854679743883264079, 4854679743883264103, 4854679743883264109, 4854679743883264121}

4854679743883263761,
4854679743883263773,
4854679743883263793,
4854679743883263797,
4854679743883263803,
4854679743883263851,
4854679743883263907,
4854679743883263911,
4854679743883263929,
4854679743883263941,
4854679743883263953,
4854679743883263971,
4854679743883263989,
4854679743883264021,
4854679743883264039,
4854679743883264049,
4854679743883264091,
4854679743883264109,
4854679743883264121,

Паттерн с диаметром 360.

10 «дырок»

{4854681445849839997, 4854681445849840009, 4854681445849840039, 4854681445849840057, 4854681445849840063,
4854681445849840093, 4854681445849840123, 4854681445849840147, 4854681445849840159, 4854681445849840183,
4854681445849840207, 4854681445849840219, 4854681445849840243, 4854681445849840273, 4854681445849840303,
4854681445849840309, 4854681445849840327, 4854681445849840357, 4854681445849840369}

4854681445849839997,
4854681445849840009,
4854681445849840057,
4854681445849840061,
4854681445849840081,
4854681445849840091,
4854681445849840139,
4854681445849840147,
4854681445849840159,
4854681445849840183,
4854681445849840207,
4854681445849840219,
4854681445849840229,
4854681445849840301,
4854681445849840307,
4854681445849840333,
4854681445849840349,
4854681445849840357,
4854681445849840369,

Паттерн с диаметром 372.

9 «дырок»

{4854681445849839997, 4854681445849840009, 4854681445849840057, 4854681445849840063, 4854681445849840093,
4854681445849840117, 4854681445849840123, 4854681445849840147, 4854681445849840159, 4854681445849840183,
4854681445849840207, 4854681445849840219, 4854681445849840243, 4854681445849840249, 4854681445849840273,
4854681445849840303, 4854681445849840309, 4854681445849840357, 4854681445849840369}

4854681445849839997,
4854681445849840009,
4854681445849840057,
4854681445849840061,
4854681445849840081,
4854681445849840091,
4854681445849840139,
4854681445849840147,
4854681445849840159,
4854681445849840183,
4854681445849840207,
4854681445849840219,
4854681445849840229,
4854681445849840301,
4854681445849840307,
4854681445849840333,
4854681445849840349,
4854681445849840357,
4854681445849840369,

Паттерн с диаметром 372.

10 «дырок»

{4854681445849839997, 4854681445849840009, 4854681445849840039, 4854681445849840063, 4854681445849840093,
4854681445849840117, 4854681445849840123, 4854681445849840147, 4854681445849840159, 4854681445849840183,
4854681445849840207, 4854681445849840219, 4854681445849840243, 4854681445849840249, 4854681445849840273,
4854681445849840303, 4854681445849840327, 4854681445849840357, 4854681445849840369}

4854681445849839997,
4854681445849840009,
4854681445849840057,
4854681445849840061,
4854681445849840081,
4854681445849840091,
4854681445849840139,
4854681445849840147,
4854681445849840159,
4854681445849840183,
4854681445849840207,
4854681445849840219,
4854681445849840229,
4854681445849840301,
4854681445849840307,
4854681445849840333,
4854681445849840349,
4854681445849840357,
4854681445849840369,

Паттерн с диаметром 372.

10 «дырок»

{4854681445849839997, 4854681445849840009, 4854681445849840039, 4854681445849840057, 4854681445849840093,
4854681445849840117, 4854681445849840123, 4854681445849840147, 4854681445849840159, 4854681445849840183,
4854681445849840207, 4854681445849840219, 4854681445849840243, 4854681445849840249, 4854681445849840273,
4854681445849840309, 4854681445849840327, 4854681445849840357, 4854681445849840369}

4854681445849839997,
4854681445849840009,
4854681445849840057,
4854681445849840061,
4854681445849840081,
4854681445849840091,
4854681445849840139,
4854681445849840147,
4854681445849840159,
4854681445849840183,
4854681445849840207,
4854681445849840219,
4854681445849840229,
4854681445849840301,
4854681445849840307,
4854681445849840333,
4854681445849840349,
4854681445849840357,
4854681445849840369,

Паттерн с диаметром 372.

10 «дырок»

{4854684695191893091, 4854684695191893103, 4854684695191893109, 4854684695191893181, 4854684695191893193,
4854684695191893223, 4854684695191893229, 4854684695191893241, 4854684695191893259, 4854684695191893271,
4854684695191893283, 4854684695191893301, 4854684695191893313, 4854684695191893319, 4854684695191893349,
4854684695191893361, 4854684695191893433, 4854684695191893439, 4854684695191893451}

4854684695191893091,
4854684695191893103,
4854684695191893131,
4854684695191893143,
4854684695191893169,
4854684695191893173,
4854684695191893181,
4854684695191893241,
4854684695191893259,
4854684695191893271,
4854684695191893283,
4854684695191893301,
4854684695191893319,
4854684695191893347,
4854684695191893361,
4854684695191893427,
4854684695191893431,
4854684695191893439,
4854684695191893451,

Паттерн с диаметром 360.

И ещё одно решение - 6 "дырок", покажу далее.

Раньше решение с 6 "дырками" уже встречалось.
Напомню его.

Цитата из сообщения
https://boinc.progger.info/odlk/forum_thread.php?id=224&postid=10589

4852958752671545507,
4852958752671545519,
4852958752671545569,
4852958752671545597,
4852958752671545599,
4852958752671545609,
4852958752671545617,
4852958752671545687,
4852958752671545717,
4852958752671545723,
4852958752671545729,
4852958752671545759,
4852958752671545777,
4852958752671545807,
4852958752671545837,
4852958752671545849,
4852958752671545921,
4852958752671545927,
4852958752671545939,

Это симметричная 19-ка с диаметром 432 из последовательных простых чисел, в которой только 6 элементов не соответствуют паттерну (не легли в паттерн).
Эти элементы выделены красным цветом.

Сейчас нашлась ещё одна аналогичная 19-ка тоже с 6 "дырками", вот она

{4854683824566175711, 4854683824566175729, 4854683824566175759, 4854683824566175771, 4854683824566175801,
4854683824566175813, 4854683824566175843, 4854683824566175849, 4854683824566175861, 4854683824566175891,
4854683824566175921, 4854683824566175933, 4854683824566175939, 4854683824566175969, 4854683824566175981,
4854683824566176011, 4854683824566176023, 4854683824566176053, 4854683824566176071}

4854683824566175711,
4854683824566175729,
4854683824566175751,
4854683824566175777,
4854683824566175801,
4854683824566175811,
4854683824566175813,
4854683824566175849,
4854683824566175861,
4854683824566175891,
4854683824566175921,
4854683824566175933,
4854683824566175939,
4854683824566175969,
4854683824566175979,
4854683824566176011,
4854683824566176047,
4854683824566176053,
4854683824566176071,

Паттерн с диаметром 360.

Покажу ещё раз этот кортеж, выделив в нём красным цветом "дырки"

{4854683824566175711,
4854683824566175729,
4854683824566175751,
4854683824566175777,
4854683824566175801,
4854683824566175811,
4854683824566175813,
4854683824566175849,
4854683824566175861,
4854683824566175891,
4854683824566175921,
4854683824566175933,
4854683824566175939,
4854683824566175969,
4854683824566175979,
4854683824566176011,
4854683824566176047,
4854683824566176053,
4854683824566176071}

Хорошенькая 19-ка!
Вы можете сравнить "дырки" с теми элементами, которые должны быть в соответствии с паттерном (смотрите эти элементы в наборе из 19 натуральных чисел, приведённом в самом начале)
Очень близкие значения, прямо совсем рядом.

А тем временем форумчанин с форума MHP справился с задачей формирования программы по исходнику.
Мы пока сделали программу на 261 паттерн с диаметром 420.
Программу он уже прислал.
Но пока не тестировала, негде.
Черепашка занята, две программы работают.
Ахиллес висит.
На Ахиллесе-3 тоже проблемы.
Жду, когда владелец найдёт время с удалёнными компьютерами разобраться.

Я спросила форумчанина, может ли он дать мне свою программу, с помощью которой он формировал текст программы.
Если бы у меня эта его программа работала, было бы очень здорово.

Визуально глянула программу. Вроде всё правильно.
Но надо тестировать, конечно.

Итак, черепашка прошла два интервала, первый маленький, второй побольше, проверялись 20 паттернов с диаметром 420

(05:26) gp > default(timer,1)
(05:26) gp > \r d420_9ki.txt
   log = 1 (on)
   [logfile is "rez_d420_9ki.txt"]
range of search
500230000001 (p=4852075928709699690 )
500230300000 (p=4852078838607000000 )
time = 1h, 19min, 8,701 ms.
(06:48) gp > \r d420_9ki.txt
   logfile = "rez_d420_9ki.txt"
range of search
500230300001 (p=4852078838616699690 )
500232000000 (p=4852095328080000000 )
time = 7h, 32min, 16,015 ms.
(15:34) gp >

Центральных девяток не найдено.

Ахиллесы мои снова работают!
Спасибо их владельцу!

Прежде чем перезапускать программы, сняла все записанные в выходные файлы результаты.
Вот ещё вписанные 19-ки, найденные в алгоритме №3 (512 формул).

9 «дырок»

{4854646674556131511, 4854646674556131517, 4854646674556131529, 4854646674556131547, 4854646674556131577,
4854646674556131589, 4854646674556131601, 4854646674556131631, 4854646674556131637, 4854646674556131679,
4854646674556131721, 4854646674556131727, 4854646674556131757, 4854646674556131769, 4854646674556131781,
4854646674556131811, 4854646674556131829, 4854646674556131841, 4854646674556131847}

4854646674556131511, 
4854646674556131517, 
4854646674556131527, 
4854646674556131553, 
4854646674556131599, 
4854646674556131601, 
4854646674556131617, 
4854646674556131631, 
4854646674556131637, 
4854646674556131679, 
4854646674556131721, 
4854646674556131727,
4854646674556131737, 
4854646674556131757, 
4854646674556131773, 
4854646674556131793, 
4854646674556131829, 
4854646674556131841, 
4854646674556131847,

Паттерн с диаметром 336.

9 «дырок»

{4854663446024575697, 4854663446024575709, 4854663446024575721, 4854663446024575739, 4854663446024575751,
4854663446024575787, 4854663446024575817, 4854663446024575871, 4854663446024575877, 4854663446024575889,
4854663446024575901, 4854663446024575907, 4854663446024575961, 4854663446024575991, 4854663446024576027,
4854663446024576039, 4854663446024576057, 4854663446024576069, 4854663446024576081}

4854663446024575697, 
4854663446024575709, 
4854663446024575741, 
4854663446024575783, 
4854663446024575787, 
4854663446024575819, 
4854663446024575831, 
4854663446024575871, 
4854663446024575877, 
4854663446024575889, 
4854663446024575901, 
4854663446024575907, 
4854663446024575921, 
4854663446024575969, 
4854663446024575979, 
4854663446024576039, 
4854663446024576059, 
4854663446024576069, 
4854663446024576081,

Паттерн с диаметром 336.

6 «дырок»

{4854664378477040371, 4854664378477040383, 4854664378477040389, 4854664378477040461, 4854664378477040473,
4854664378477040503, 4854664378477040509, 4854664378477040521, 4854664378477040539, 4854664378477040551,
4854664378477040563, 4854664378477040581, 4854664378477040593, 4854664378477040599, 4854664378477040629,
4854664378477040641, 4854664378477040713, 4854664378477040719, 4854664378477040731}

4854664378477040371, 
4854664378477040383, 
4854664378477040401, 
4854664378477040423, 
4854664378477040453, 
4854664378477040483, 
4854664378477040509, 
4854664378477040521, 
4854664378477040539, 
4854664378477040551, 
4854664378477040563, 
4854664378477040581, 
4854664378477040593, 
4854664378477040599, 
4854664378477040671, 
4854664378477040681, 
4854664378477040713, 
4854664378477040719, 
4854664378477040731,

Паттерн с диаметром 360.

8 «дырок»

{4854675824160327491, 4854675824160327521, 4854675824160327533, 4854675824160327563, 4854675824160327593,
4854675824160327611, 4854675824160327623, 4854675824160327647, 4854675824160327653, 4854675824160327677,
4854675824160327701, 4854675824160327707, 4854675824160327731, 4854675824160327743, 4854675824160327761,
4854675824160327791, 4854675824160327821, 4854675824160327833, 4854675824160327863}

4854675824160327491, 
4854675824160327521, 
4854675824160327533, 
4854675824160327541, 
4854675824160327551, 
4854675824160327569, 
4854675824160327577, 
4854675824160327647, 
4854675824160327653, 
4854675824160327677, 
4854675824160327701, 
4854675824160327707, 
4854675824160327733, 
4854675824160327761, 
4854675824160327769, 
4854675824160327791, 
4854675824160327799, 
4854675824160327833, 
4854675824160327863,

Паттерн с диаметром 372.

8 «дырок»

{4854679095500733199, 4854679095500733211, 4854679095500733229, 4854679095500733241, 4854679095500733277,
4854679095500733307, 4854679095500733319, 4854679095500733349, 4854679095500733361, 4854679095500733379,
4854679095500733397, 4854679095500733409, 4854679095500733439, 4854679095500733451, 4854679095500733481,
4854679095500733517, 4854679095500733529, 4854679095500733547, 4854679095500733559}

4854679095500733199, 
4854679095500733211, 
4854679095500733253, 
4854679095500733269, 
4854679095500733287, 
4854679095500733311, 
4854679095500733337, 
4854679095500733349, 
4854679095500733361, 
4854679095500733379, 
4854679095500733397, 
4854679095500733409, 
4854679095500733439, 
4854679095500733467, 
4854679095500733493, 
4854679095500733497, 
4854679095500733529, 
4854679095500733547, 
4854679095500733559,

Паттерн с диаметром 360.

9 «дырок»

{4854679743883263761, 4854679743883263773, 4854679743883263779, 4854679743883263803, 4854679743883263863,
4854679743883263869, 4854679743883263893, 4854679743883263911, 4854679743883263929, 4854679743883263941,
4854679743883263953, 4854679743883263971, 4854679743883263989, 4854679743883264013, 4854679743883264019,
4854679743883264079, 4854679743883264103, 4854679743883264109, 4854679743883264121}

4854679743883263761, 
4854679743883263773, 
4854679743883263793, 
4854679743883263797, 
4854679743883263803, 
4854679743883263851, 
4854679743883263907, 
4854679743883263911, 
4854679743883263929, 
4854679743883263941, 
4854679743883263953, 
4854679743883263971, 
4854679743883263989, 
4854679743883264021, 
4854679743883264039, 
4854679743883264049, 
4854679743883264091, 
4854679743883264109, 
4854679743883264121,

Паттерн с диаметром 360.

Много решений!
Опять встретилась 19-ка с 6 "дырками".
Отлично!
А с 5 "дырками" пока никак не найдётся.

Обратите внимание на диаметры, они все >=336.
Показательно!

Напомню, что в этом алгоритме задействовано 233 паттерна с разными диаметрами, объединёнными по количеству формул - 512.
Солидное количество паттернов, вот и решений много.

Ахиллес уже нашёл новую центральную 9-ку для паттерна с диаметром 396

range of search
500202000001 (p=4851804337389699690 )
500222000000 (p=4851998331180000000 )
4851932587405622351, 4851932587405622387, 4851932587405622417, 4851932587405622429, 4851932587405622489,
4851932587405622549, 4851932587405622561, 4851932587405622591, 4851932587405622627,
4851932587405622291,
4851932587405622293,
4851932587405622351,
4851932587405622387,
4851932587405622417,
4851932587405622429,
4851932587405622489,
4851932587405622549,
4851932587405622561,
4851932587405622591,
4851932587405622627,
4851932587405622647,
4851932587405622657,
4851932587405622683,

4851932587405622291, 4851932587405622297, 4851932587405622309, 4851932587405622321, 4851932587405622339,
4851932587405622351, 4851932587405622387, 4851932587405622417, 4851932587405622429, 4851932587405622489,
4851932587405622549, 4851932587405622561, 4851932587405622591, 4851932587405622627, 4851932587405622639,
4851932587405622657, 4851932587405622669, 4851932587405622681, 4851932587405622687,

9-ка не продолжается даже до 11-ки ни в какую сторону.
Количество вписанных последовательных простых чисел равно 14, недалеко от среднестатистического на данный момент - 13.

Имеем 13-ку с 3 "дырками" ("дырки" как всегда красные)

4851932587405622291,
4851932587405622293,
4851932587405622351,
4851932587405622387,
4851932587405622417,
4851932587405622429,
4851932587405622489,
4851932587405622549,
4851932587405622561,
4851932587405622591,
4851932587405622627,
4851932587405622647,
4851932587405622657

Плоховато, но всё же :)

Новая вписанная 19-ка в алгоритме №7 (384 формулы)

7 «дырок»

{4857812521894829747, 4857812521894829759, 4857812521894829789, 4857812521894829807, 4857812521894829813,
4857812521894829867, 4857812521894829873, 4857812521894829897, 4857812521894829909, 4857812521894829933,
4857812521894829957, 4857812521894829969, 4857812521894829993, 4857812521894829999, 4857812521894830053,
4857812521894830059, 4857812521894830077, 4857812521894830107, 4857812521894830119}

4857812521894829747,
4857812521894829759,
4857812521894829767,
4857812521894829797,
4857812521894829857,
4857812521894829867,
4857812521894829873,
4857812521894829897,
4857812521894829909,
4857812521894829933,
4857812521894829957,
4857812521894829969,
4857812521894830007,
4857812521894830011,
4857812521894830031,
4857812521894830073,
4857812521894830077,
4857812521894830107,
4857812521894830119,

Паттерн с диаметром 372.

Хорошенькая 19-ка!

Напомню, что во время работы программы gris формирования формул для паттернов с диаметром 432 Ахиллес завис.
Ахиллес перезапущен владельцем и снова работает.
Сейчас посмотрела выходной файл, он есть!
Уже сформировано довольно много формул для паттернов.

Буду вручную формировать программу обработки паттернов с диаметром 432.
Для паттернов с диаметром 420 сформировала программу на 20 паттернов.
Сейчас попробую столько же паттернов сделать для диаметра 432, если 20 паттернов есть в выходном файле.

Кстати, об автоматическом формировании текста программы для обработки паттернов, которое сделал форумчанин с форума MHP.
Он делал для 261 паттернов с диаметром 420.
Всю программу мне не удалось отправить на Ахиллес-3 (проблемы с копированием), отправила только на 34 паттерна.
Сейчас эта программа работает. Пока ошибок не выдано.

Так вот, я спросила форумчанина, может ли он мне дать программу формирования текста программы.
Он ответил, что делал это в Матлабе и прислал какую-то ссылку, предупредив, что дистрибутив 22 ГБ.
Я очень удивилась.
Это что - весь Матлаб что ли он мне прислал?
Конечно, даже не стала пытаться это скачивать, такие объёмы не для моего ПК.

В общем, мы увидели, что инструмент для автоматического формирования текста программы по исходнику с паттернами и соответствующими им формулами есть.
Инструмент прекрасно работает, текст программы формировался несколько секунд.
Разумеется, а что там долго делать, процедура простая до безобразия.
Понятно, что человеческие возможности не позволяют делать это так быстро, как делает машина.

Вряд ли форумчанин согласится делать это для всех моих паттернов.
Даже и не стала задавать такой вопрос.

А знаете ли вы?
Даже вручную выполняемую процедуру можно оптимизировать!
Сейчас посмотрела, сколько теоретически допустимых паттернов (без 0 formulae) выдал Ахиллес с диаметром 432 перед зависанием.
Их оказалось 63.
Ну, не зря же трудился Ахиллес :)
Решила сформировать программу для обработки всех этих паттернов.
С оптимизацией сделала это примерно за 15-20 минут.
С переменными блоками, которые берутся из исходника, вообще всё очень быстро получается.
Сложнее со вставкой постоянного блока.
Для этого не придумала хорошего прёма, кроме банальной ручной вствки между всеми переменными блоками.
Это самая нудная часть процедуры.

Итак, программа на обработку 63 паттернов с диаметром 432 сформирована!
Сейчас буду тестировать её.

Кстати, очень помогла подсказка Demis, смотрите сообщение
https://boinc.progger.info/odlk/forum_thread.php?id=232&postid=11062

Раньше я задавала длину вектора а вручную, а сейчас она задаётся автоматически.

Demis, ещё раз огромное спасибо!
Очень рада, что вы следите за моими работами и даёте такие ценные подсказки.

Да-а-а-а...
Отладка программы в PARI/GP - экзекуция.
Запускаю программу, выдаётся ошибка

(05:07) gp > \r d432_9ki.txt
   logfile = "rez_d432_9ki.txt"
  ***   syntax error, unexpected $end, expecting ',': ...p[19],",
  ***   ");print(););););
  ***                   ^-

В каком месте искать ошибку?
Ошибка, как видно, в постоянном блоке.
У меня 63 блока!
Что делать?
Начинаю проверять методом исключения блоков.
Сделала 6 шагов по добавлению блоков (сразу по несколько блоков), дошла до предпоследнего блока, программа работает!
Добавляю последний блок, программа не работает!
И что там за ошибка? Если этот постоянный блок всё время вставляется под копирку!!
Ну, делать нечего: выбрасываю последний блок и запускаю программу.

Таким образом, программа получилась на обработку 62 паттернов, один выброшен.
Это тоже очень хорошо.
Столько паттернов я ещё не формировала вручную.
Пока программа работает.
Задала маленький интервал.
Жду, что скажет.

Тестирует черепашка.
Вот так начинает

(05:10) gp > \r d432_9ki.txt
   logfile = "rez_d432_9ki.txt"
range of search
500222000001 (p=4851998331189699690 )
500222100000 (p=4851999301149000000 )

Пока пыхтит :)
Интервал всего 100000.

PS. Есть подозрение, что в конце постоянного блока лишние эти самые скобки и точки с запятой.
Но откуда они там взялись именно в последнем блоке?
Ведь во всех предыдущих постоянных блоках всё нормально!

Ошибку нашла, только она, как водится, не в постоянном блоке, а в предшествующем переменном блоке.
Это последний блок, на котором Ахиллес завис, поэтому вектор формул не сформировался полностью, он заканчивается так

[4847,5771,7811,67871,80741,143947,154997,195961,198001,224951,260987,270931,299207,301027,312077,345187,348151,372137,374177,421081,465191,502267,505231,538121,565291,576341,578161,578381,586571,614417,626611,651311,652417,654457,687347,714517,725567,727387,743651,771497,831557,844427,871597,882647,891551,892877,918721,931591,991651,1035761,1048631,1075801,1083991,1097081,1108691,1111837,1148731,1157141,1170011,1184767,1184987,1197181,1197857,1222987,1225027,1233217,1257917,1297957,1314221,1342067,1388971,1390297,1414997,1437421,1462121,1463447,1464371,1492217,1502161,1510351,1538197,1565147,1594501,1613597,1619201,1654561,1667431,1667651,1682407,1695277,1740581,1743727,1755337,1768427,1769351,1770677,1803787,1816657,1817801,1890731,1918577,1959541,1960867,1974881,2007991,2020861,2034941,2047811,2062787,2075657,2080921,2108767,2111017,2124107,2135717,2165071,2184167,2197037,2238001,2265847,2314297,2315221,2339921,2341247,2350151,2387227,2388151,2388371,2390191,2401241,2415997,2461301,2464447,2489147,2507231,2537377,2545451,2581487,2591431,2618381,2621527,2646227,2654417,2656457,2681587,2694457,2694677,2741581,2767607,2847571,2858621,2860661,2885791,2898661,2920721,2933591,2958721,2960761,2971811,2986567,2996797,3007847,3035017,3047887,3077801,3107947,3152057,3153877,3164927,3192097,3201001,3224987,3227027,3227951,3265027,3273931,3312151,3358081,3377177,3418141,3429191,3431011,3431231,3469231,3479461,3504161,3505267,3507307,3534257,3567367,3578417,3580237,3581381,3618457,3654311,3724447,3735497,3738461,3771571,3784441,3798521,3811391,3844501,3859841,3874597,3885647,3887687,3928651,3947747,3960617,4001581,4050031,4075837,4077877,4078801,4104827,4150807,4151731,4151951,4164821,4200181,4224881,4228027,4300957,4309031,4317221,4345067,4355011,4357261,4381961,4385107,4417997,4430411,4445167,4456217,4458037,4458257,4466447,4505161,4506487,4531187,4622201,4623527,4649371,4662241,4670651,4710691,4722301,4735391,4743581,4770751,4771427,4783621,4798597,4811467,4827731,4871527,4887791,4900661,4915637,4927831,4928507,4955677,4963867,4976957,4988567,5028607,5037017,5049887,5075731,5077057,5168071,5192771,5194097,5232811,5241001,5241221,5243041,5254091,5268847,5281261,5314151,5317297,5341997,5344247,5354191,5382037,5390227,5398301,5471231,5474377,5499077,5534437,5547307,5547527,5548451,5594431,5620457,5621381,5623421,5649227,5697677,5738641,5751511,5770607,5811571,5813611,5824661,5839417,5854757,5887867,5900737,5914817,5927687,5960797,5963761,5974811,6044947,6080801,6117877,6119021,6120841,6131891,6165001,6191951,6193991,6195097,6219797,6230027,6268027,6268247,6270067,6281117,6322081,6341177,6387107,6425327,6434231,6471307,6472231,6474271,6498257,6507161,6534331,6545381,6547201,6591311,6621457,6651371,6664241,6691411,6702461,6712691,6727447,6738497,6740537,6765667,6778537,6800597,6813467,6838597,6840637,6851687,6931651,6957677,7004581,7004801,7017671,7042801,7044841,7053031,7077731,7080877,7107827,7117771,7153807,7161881,7192027,7210111,7234811,7237957,7283261,7298017,7309067,7310887,7311107,7312031,7349107,7358011,7359337,7384037,7384961,7433411,7461257,7502221,7515091,7534187,7563541,7575151,7588241,7590491,7618337,7623601,7636471,7651447,7664317,7678397,7691267,7724377,7738391,7739717,7780681,7808527,7881457,7882601,7895471,7928581,7929907,7930831,7943921,7955531,7958677,8003981,8016851,8031607,8031827,8044697,8080057,8085661,8104757,8134111,8161061,8188907,8197097,8207041,8234887,8235811,8237137,8261837,

В результате при преобразовании в Ворде этот блок не был преобразован из-за нестандартного окончания.

Черепашка с тестированием справилась

(05:10) gp > \r d432_9ki.txt
   logfile = "rez_d432_9ki.txt"
range of search
500222000001 (p=4851998331189699690 )
500222100000 (p=4851999301149000000 )
time = 1h, 35min, 48,169 ms.

Отлично!
Ошибок нет.
62 паттерна проверялись с диаметром 432.

Сейчас ещё раз запущу программу, увеличу интервал до 300000.

Вот так сегодня черепашка проверяла 20 паттернов с диаметром 408

(03:02) gp > \r d408_9ki.txt
   log = 1 (on)
   [logfile is "rez_d408_9ki.txt"]
range of search
500238000001 (p=4852153526229699690 )
500240000000 (p=4852172925600000000 )
(08:55) gp > default(timer,1)
(09:11) gp > \r d408_9ki.txt
   logfile = "rez_d408_9ki.txt"
range of search
500240000001 (p=4852172925609699690 )
500242000000 (p=4852192324980000000 )
time = 5h, 28min, 52,958 ms.
(15:19) gp > \r d408_9ki.txt
   logfile = "rez_d408_9ki.txt"
range of search
500242000001 (p=4852192324989699690 )
500243000000 (p=4852202024670000000 )
time = 2h, 41min, 3,201 ms.
(18:20) gp > \r d408_9ki.txt
   logfile = "rez_d408_9ki.txt"
range of search
500243000001 (p=4852202024679699690 )
500243500000 (p=4852206874515000000 )
time = 1h, 21min, 2,755 ms.
(20:10) gp > \r d408_9ki.txt
   logfile = "rez_d408_9ki.txt"
range of search
500243500001 (p=4852206874524699690 )
500244000000 (p=4852211724360000000 )
time = 1h, 21min, 46,638 ms.

Ни одной центральной 9-ки не найдено в этом диапазоне.

Так черепашка проверяла сегодня 62 паттерна с диаметром 432

(05:10) gp > \rd432_9ki.txt
   logfile = "rez_d432_9ki.txt"
range of search
500222000001 (p=4851998331189699690 )
500222100000 (p=4851999301149000000 )
time = 1h, 35min, 48,169 ms.
(07:14) gp > \rd432_9ki.txt
   logfile = "rez_d432_9ki.txt"
range of search
500222100001 (p=4851999301158699690 )
500222400000 (p=4852002211056000000 )
time = 4h, 48min, 55,550 ms.
(15:34) gp > \rd432_9ki.txt
   logfile = "rez_d432_9ki.txt"
range of search
500222400001 (p=4852002211065699690 )
500222500000 (p=4852003181025000000 )
time = 1h, 35min, 15,222 ms.
(17:31) gp > \rd432_9ki.txt
   logfile = "rez_d432_9ki.txt"
range of search
500222500001 (p=4852003181034699690 )
500222600000 (p=4852004150994000000 )
time = 1h, 35min, 35,345 ms.

Ни одной центральной 9-ки не найдено в этом диапазоне.

Итак, на данный момент сделаны следующие программы для поиска центральных 9-ок для паттернов с разными диаметрами

1) 10 паттернов с диаметром 396; сделано вручную;
2) 10 паттернов с диаметром 408; сделано вручную;
3) 20 паттернов с диаметром 420; сделано вручную;
4) 261 паттерн с диаметром 420, сделано форумчанином автоматически;
5) 62 паттерна с диаметром 432; сделано вручную.

Все программы, за исключением программы для 261 паттерна, уже протестированы, они работают.

Как уже сказано выше, программа gris формирования формул для паттернов с диаметром 432 не выполнилась до конца из-за зависания Ахиллеса.
Сформированы формулы только для 62 паттернов.
Вот для них я и сделала вручную программу поиска центральных 9-ок.

Сегодня рано утром запустила программу формирования формул для паттернов с диаметром 432 на Ахиллесе-3.
Программа до сих пор работает.
Теперь уже до утра.

Ахиллес-3 выполнил программу gris формирования формул для паттернов с диаметром 432.
Показываю хвост вывода из консоли

[0, 96, 102, 120, 132, 162, 180, 186, 210, 216, 222, 246, 252, 270, 300, 312, 330, 336, 432]
. . . . . . . . . 
7,8292121,8297867,8316431,8331901,8333617,8344327,8357927,8391961,8392507,8402671,8404387,8417701,8442011,8444167,8454437,8462731,8502071,8512781,8514497,8554277,8572841,8578147,8580017,8582411,8588311,8588857,8598581,8614051,8614337,8640077,8648371,8648917,8658487,8674111,8718547,8742857,8759027,8768051,8768597,8784221,8802631,8826941,8828657,8844127,8862691,8868437,8887001,8902471,8903017,8904187,8914897,8928211,8928497,8962531,8963077,8973241,8988271,9012581,9025007,9072641,9073187,9083351,9085067,9088657,9098381,9107221,9109091,9124847,9143411,9148717,9150587,9158881,9159427,9169151,9184621,9210647,9219487,9229057,9244681,9245227,9269537,9294731,9329597,9339167,9354791,9373201,9397511,9399227,9414697,9430867,9433261,9439007,9455177,9457571,9473041,9473587,9489211,9498781,9533647,9558841,9583151,9583697,9595577,9608891,9617731,9643211,9643757,9653921,9659227,9668951,9677791,9679661,768 formulae

for tuple diameter=432   number of pretuples=23535820 after (%5,7,11) good:3671
time = 20h, 37min, 36,156 ms.

Программа работала 20,5 часов.
Не все паттерны из 3671 допустимые, надо выбросить паттерны с 0 formulae, такие есть.
Как видим, теоретических паттернов с диаметром 432 меньше, чем с диаметром 420, которых 4302 шт.

На очереди паттерны с диаметром 444.

Раньше у меня был задействован всего один паттерн с диаметром 444

1024: 0 60 102 132 144 174 180 192 210 222 234 252 264 270 300 312 342 384 444

Перед паттерном указано количество формул.

PS. Если не ошиблась с подсчётом паттернов с 0 formulae, их нашлось 122.
Таким образом, допустимых теоретических паттернов с диаметром 432 3549 шт.

Кстати, об оптимизации процедуры формирования текста программы.

Вот это переменный блок, как он выводится программой gris формирования формул

[0, 18, 30, 54, 60, 78, 84, 138, 198, 204, 210, 270, 324, 330, 348, 354, 378, 390, 408]

[7169,121283,155443,200323,326939,441053,541829,604073,767929,865169,1028189,1087699,1142303,1221343,1250719,1347959,1364833,1462073,1562849,1607729,1625093,1669973,1770749,1788949,1884863,2090519,2108719,2204633,2271739,2316619,2367653,2385853,2430733,2531509,2593753,2628749,2690993,2791769,2851279,2905883,2913523,3014299,3111539,3128413,3225653,3337639,3388673,3433553,3451753,3552529,3614773,3872299,3934543,4001159,4035319,4080199,4149433,4194313,4320929,4357333,4454573,4483949,4598063,4677103,5022179,5101219,5215333,5244709,5341949,5378353,5504969,5549849,5619083,5663963,5698123,5764739,5826983,6084509,6146753,6247529,6265729,6310609,6361643,6473629,6570869,6587743,6684983,6785759,6793399,6848003,6907513,7008289,7070533,7105529,7167773,7268549,7313429,7331629,7382663,7427543,7494649,7590563,7608763,7814419,7910333,7928533,8029309,8074189,8091553,8136433,8237209,8334449,8351323,8448563,8477939,8556979,8611583,8671093,8834113,8931353,9095209,9157453,9258229,9372343,9498959,9543839,9577999,9692113,128 formulae

В тексте программы этот переменный блок должен быть записан так:

p=[0, 18, 30, 54, 60, 78, 84, 138, 198, 204, 210, 270, 324, 330, 348, 354, 378, 390, 408];
a=[7169,121283,155443,200323,326939,441053,541829,604073,767929,865169,1028189,1087699,1142303,1221343,1250719,1347959,1364833,1462073,1562849,1607729,1625093,1669973,1770749,1788949,1884863,2090519,2108719,2204633,2271739,2316619,2367653,2385853,2430733,2531509,2593753,2628749,2690993,2791769,2851279,2905883,2913523,3014299,3111539,3128413,3225653,3337639,3388673,3433553,3451753,3552529,3614773,3872299,3934543,4001159,4035319,4080199,4149433,4194313,4320929,4357333,4454573,4483949,4598063,4677103,5022179,5101219,5215333,5244709,5341949,5378353,5504969,5549849,5619083,5663963,5698123,5764739,5826983,6084509,6146753,6247529,6265729,6310609,6361643,6473629,6570869,6587743,6684983,6785759,6793399,6848003,6907513,7008289,7070533,7105529,7167773,7268549,7313429,7331629,7382663,7427543,7494649,7590563,7608763,7814419,7910333,7928533,8029309,8074189,8091553,8136433,8237209,8334449,8351323,8448563,8477939,8556979,8611583,8671093,8834113,8931353,9095209,9157453,9258229,9372343,9498959,9543839,9577999,9692113];
lena=#a;

Очевидно, как преобразовываются переменные блоки, делаю я эти преобразования в Ворде.
Но!
Это же можно вставить в программу gris, которая формирует формулы!
Программа будет выдавать готовые переменные блоки.
И тогда останется только вставить в полученный выходной текстовый файл постоянный блок после каждого переменного блока.
Ну, и ещё удалить переменные блоки с 0 formulae.

Вот перед вами программа gris формирования формул для паттернов с диаметром 432

\l d432_formulae_new.txt;
allocatemem(2^29);
{  p=vector(19); p[1]=0; pl=19; \\vector for pattern pl - lenght
diam=432;
 
k=0; kw=0; n=diam\12; m=n-8; d2=diam\2;
 
N=2*3*5*7*11*13*17*19;   \\primorial
lind=N+diam; \\ length of index array; forming of it
vind=vector(lind,i,(i%2!=0) * (i%3!=0) * (i%5!=0) *
                   (i%7!=0) * (i%11!=0) * (i%13!=0)*
                   (i%17!=0)* (i%19!=0));
    
\\ generate prepatterns
 
for(i1=1, m,     j2=i1;
for(i2=1, m+1-j2,j3=j2+i2;  
for(i3=1, m+2-j3,j4=j3+i3;
for(i4=1, m+3-j4,j5=j4+i4;
for(i5=1, m+4-j5,j6=j5+i5;
for(i6=1, m+5-j6,j7=j6+i6;
for(i7=1, m+6-j7,j8=j7+i7;
for(i8=1, m+7-j8,j9=j8+i8;
for(i9=1, m+8-j9,
 
if(i1+i2+i3+i4+i5+i6+i7+i8+i9==n,k++;
  p[2]=6*j2;
  p[3]=6*j3;
  p[4]=6*j4;
  p[5]=6*j5;
  p[6]=6*j6;
  p[7]=6*j7;
  p[8]=6*j8;
  p[9]=6*j9;
  p[10]=d2;
  p[11]=diam-6*j9;
  p[12]=diam-6*j8;
  p[13]=diam-6*j7;
  p[14]=diam-6*j6;
  p[15]=diam-6*j5;
  p[16]=diam-6*j4;
  p[17]=diam-6*j3;
  p[18]=diam-6*j2;
  p[19]=diam;
    
  \\ we have new prepattern; test it for good
  wt=1;
  forprime( w=5,13, ws=w-1;
    for (s=1,w-1,
      for ( i=2,19, if( (s+p[i])%w==0, ws--; break ) );
    ); wt=wt*ws; if(wt==0, break);
  );
 
  if( wt!=0, kw++; \\ we have the good pattern!
    print(p); print ("");
    kf=0;
    print1("[");
    for( j=1,N,
       ind=1; for( i=1,pl, if( vind[j+p[i]]==0, ind=0; break  )  );
    
       if( ind==1,kf++; \\ we have formula
         \\for( i=1,pl, print1(j+p[i]," ")  ); print(" ")
         print1(j, ",")
       );
   ); print(kf, " formulae"); print()
  );
  \\if(kw>10,break(9));
)
))) ))) )));
print("for tuple diameter=",diam,"   number of pretuples=",k, " after (%5,7,11) good:", kw)
}

Для других диаметров в программе надо изменить строку

diam=432;

Ну, и соответственно имя выходного файла

\l d432_formulae_new.txt;

Понятно, что в этой программе можно сделать нужный нам формат вывода переменного блока.
Могу сама попробовать, но лучше бы это сделал gris.

gris,
пожалуйста, сделайте это.

У черепашки сегодня сложное задание :)
Ахиллес занят полностью, на Ахиллесе-3 проблема с копированием, не могу туда отправить всю программу на 261 паттерн с диаметром 420, которую мне сделал форумчанин.
Кое-как скопировала туда текст программы на 34 паттерна, эта программа работает.

Теперь хочу на черепашке протестировать всю программу на 261 паттерн.
Задала маленький интервал - 100000.
Вот так черепашка начинает

(06:08) gp > \r d420_9ki_261.txt
   logfile = "rez_d420_9ki.txt"
  ***   Warning: new stack size = 536870912 (512.000 Mbytes).
range of search
500228000001 (p=4852056529329699690 )
500228100000 (p=4852057499289000000 )

Ошибок не выдала на старте, уже хорошо.
Справится ли за рабочий день?

Пока gris ещё спит, попробовала сама модифицировать его программу формирования формул для паттернов с заданным диаметром.
Напомню: мне нужно получить в выходном файле определённый формат переменных блоков.

Для тестирования взяла программу для диаметра 336; для этого диаметра мало теоретически допустимых паттернов.
Программа уже поехала на Ахиллесе-3.
Всё получилось, за исключением одного места.
Покажу чуть позже, как программа отработает.

Готово!
Программа завершилась.
Показываю хвост вывод из консоли

. . . . . . . . . . 
7815113,7853281,7943021,7952303,8033461,8043341,8052623,8053351,8112463,8132353,8180531,8203631,8282633,8312533,8380601,8471041,8482703,8540761,8550043,8558713,8573143,8641211,8701051,8710931,8720213,8738893,8801371,8806961,8885963,8900393,8909063,8967121,8976403,9128621,9137291,9138631,9146573,9176473,9304381,9326753,9346643,9404701,9406483,9474551,9506803,9554981,9564991,9574871,9634711,9643993,];
lena=#a;

p=[0, 48, 60, 66, 78, 90, 120, 126, 150, 168, 186, 210, 216, 246, 258, 270, 276, 288, 336];

a=[16921,72613,110651,186233,220981,297421,424471,480163,612593,680363,850831,906523,1088771,1106723,1110013,1310213,1514273,1515131,1590713,1604143,1642181,1717763,1718621,1828951,1884643,1922681,2011693,2012551,2088133,2126171,2144123,2420101,2438053,2514493,2552531,2620301,2641543,2846461,2922043,3046661,3049951,3122243,3250151,3305843,3416173,3454211,3530651,3544081,3619663,3657701,3713393,3824581,3951631,4028071,4046023,4084061,4139753,4343243,4377991,4453573,4454431,4581481,4637173,4837373,4861981,5062181,5117873,5244923,5245781,5321363,5356111,5559601,5615293,5653331,5671283,5747723,5874773,5985961,6041653,6079691,6155273,6168703,6245143,6283181,6393511,6449203,6577111,6649403,6652693,6777311,6852893,7057811,7079053,7146823,7184861,7261301,7279253,7555231,7573183,7611221,7686803,7687661,7776673,7814711,7870403,7980733,7981591,8057173,8095211,8108641,8184223,8185081,8389141,8589341,8592631,8610583,8792831,8848523,9018991,9086761,9219191,9274883,9401933,9478373,9513121,9588703,9626741,9682433,];
lena=#a;

for tuple diameter=336   number of pretuples=2220075 after (%5,7,11) good:132

Мне не удалось "убить" запятую в конце вектора а.
Она мешает?
Сейчас проверю.

Да, запятая в конце вектора мешает, выдаётся ошибка.
Ну, удалить эту запятую можно быстренько в Ворде.
Можно ещё после вектора р убрать пустую строку.
Переменный блок будет выглядеть компактно.
Но можно и не выбрасывать, она не мешает.

Теперь проблема: как в полученный текстовый файл вставить постоянные блоки.
Понятно, что есть тривиальное решение: вставить их вручную.
А как вставить программой?

Постоянный блок - вот

for( i=i1,i2,                                                                                                                                                           
  bp=i*period;                                                                                                                                                          
  for( n=1,lena, bpt=bp+a[n];                                                                                                                                           
    if(  ispseudoprime  (bpt)       &&                                                                                                                                  
         ispseudoprime  (bpt+p[6])  &&                                                                                                                                  
         ispseudoprime  (bpt+p[7] ) &&                                                                                                                                  
         ispseudoprime  (bpt+p[8])  &&                                                                                                                                  
         ispseudoprime  (bpt+p[9])  &&                                                                                                                                  
         ispseudoprime  (bpt+p[10]) &&                                                                                                                                  
         ispseudoprime  (bpt+p[11]) &&                                                                                                                                  
         ispseudoprime  (bpt+p[12]) &&                                                                                                                                  
         ispseudoprime  (bpt+p[13]) &&                                                                                                                                  
         ispseudoprime  (bpt+p[14]) &&                                                                                                                                  
         nextprime((bpt+p[6])+1) == (bpt+p[7])   &&                                                                                                                     
         nextprime((bpt+p[7])+1) == (bpt+p[8])   &&                                                                                                                     
         nextprime((bpt+p[8])+1) == (bpt+p[9])   &&                                                                                                                     
         nextprime((bpt+p[9])+1) == (bpt+p[10])  &&                                                                                                                     
         nextprime((bpt+p[10])+1) == (bpt+p[11]) &&                                                                                                                     
         nextprime((bpt+p[11])+1) == (bpt+p[12]) &&                                                                                                                     
         nextprime((bpt+p[12])+1) == (bpt+p[13]) &&                                                                                                                     
         nextprime((bpt+p[13])+1) == (bpt+p[14]),                                                                                                                       
      print1(bpt+p[6],", ");  print1(bpt+p[7],", "); print1(bpt+p[8],", "); print1(bpt+p[9],", ");print1(bpt+p[10],", ");print1(bpt+p[11],", ");print1(bpt+p[12],", "); 
      print1(bpt+p[13],", "); print1(bpt+p[14],", ");print();                                                                                                           
      for prime(k=bpt, bpt+p[19], print(k,", "););   print();                                                                                                           
      print1(bpt,", ");       print1(bpt+p[2],", "); print1(bpt+p[3],", "); print1(bpt+p[4],", ");print1(bpt+p[5],", ");print1(bpt+p[6],", ");print1(bpt+p[7],", ");    
      print1(bpt+p[8],", ");  print1(bpt+p[9],", "); print1(bpt+p[10],", ");print1(bpt+p[11],", ");print1(bpt+p[12],", ");print1(bpt+p[13],", ");print1(bpt+p[14],", ");
      print1(bpt+p[15],", "); print1(bpt+p[16],", ");print1(bpt+p[17],", ");print1(bpt+p[18],", ");print1(bpt+p[19],", ");print();                                      
    );                                                                                                                                                                  
  );                                                                                                                                                                    
);

После каждого переменного блока надо вставить этот постоянный блок.
И всё будет в ажуре :)
Ну, про "шапку" программы не забыть, конечно, вот она

\l rez_d420_9ki.txt;
allocatemem(2^29);
{period = 9699690; pl=19; dm=420; N=period; \\N=#19
print("range of search");
i1=500228000001; print(i1," (p=", i1*9699690," )");
i2=500228100000; print(i2," (p=", i2*9699690," )");