Можно ли написать скрипт для проверки кортежей?

[Xaositect]

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

[NT2000]

Xaositect совершенно прав.
Пользователю ice00 хотелось именно применить сервис Вольфрама для автоматизации обработки результатов, a нe писать собственную программу для разложение кортежа.

[Nataly-Mak]

Такой вопрос возник, чтобы не открывать новую тему, решила задать тут.
Подробности изложены здесь:
post1048532.html#p1048532

Наверное, у кого-то есть матпакет Wolfram Mathematica или хоть какой-то другой.
Мне просто очень интересна сама возможность написать такую программку. Можно, нет? Думаю, что вполне можно.

Вот в онлайне WA слишком длинную команду не принял:

Select[Range[1000000,1010000],PrimeQ[(#*2310+817+46)]&& PrimeQ[(#*2310+817+10)] &&PrimeQ[(#*2310+817+24)]&& PrimeQ[(#*2310+817+36)]&&  PrimeQ[(#*2310+817+40)]&& PrimeQ[(#*2310+817+42)]&& PrimeQ[(#*2310+817)]&]

Выдаётся сообщение, что слишком длинная команда. Как это обойти, я не знаю.
По команде, которая принята, я нашла решение по заданным элементам паттерна, даже чуть больше: заданы 6 элементов паттерна, с 3 элементами повезло – они тоже оказались простыми числами.
В результате решение с 3 “дырками”:

Select[Range[0,46],PrimeQ[(1026159*2310+817)+#]&]
{0, 4, 10, 12, 24, 34, 40, 42, 46}

то есть найдены 9 правильных элементов кортежа из 12, соответствующих элементам паттерна. И это очень быстро.

[Nataly-Mak]

Begemot82 в сообщении #1049134 писал(а):

Еще вариант

table[Select[{0,6,12,246,252},PrimeQ[(n*9699690+3297661)+#]&]={0,6,12,246,252},{n,400000000,400000700}]

Но знаний нет, как избавиться от лишней выдачи и наоборот выдавать значения n.

А кто-то обладает такими знаниями, но не хочет ими поделиться

Цитата:

то есть найдены 9 правильных элементов кортежа из 12, соответствующих элементам паттерна. И это очень быстро.

Begemot82 нашёл решение с 10 правильными элементами кортежа длины 19 в онлайн WA.

Так как же всё-таки написать программу поиска такого кортежа в системе Wolfram Mathematica
Или написать скрипт с обращением к WA?
Неужто никто не знает? Или просто лень рассказывать?
Понятно, что выполнять разовые команды в онлайн WA - это пустая трата времени.
Позавчера прослушала лекцию о продуктах Wolfram, но мало что в ней поняла.
Где-то должно быть описание языка системы, это как минимум.
Вот эти все разовые коды команд, которые демонстрирует Begemot82, они ведь где-то должны быть описаны, он же их не с потолка берёт.
Ну, хотя бы дали ссылки на русскоязычное описание языка программирования в этой системе.
Если мне слабо это осилить, то, возможно, Begemot82 осилит.

Выше тут приводила и скрипт обращения к WA, написанный немецким коллегой. Ничего сложного в этом наверняка нет, просто надо всё это знать. А мне, как и Begemot82, не хватает знаний. И добывать их в моём возрасте довольно сложно, увы

[Aritaborian]

Nataly-Mak в сообщении #1049628 писал(а):

Где-то должно быть описание языка системы, это как минимум.

Здесь. Исчерпывающая документация с огромным количеством примеров. Это описание именно Wolfram Language, не путайте с языком запросов к Альфе, документации к которому не существует в принципе, ибо не существует самого языка: Альфа изначально ориентирована на запросы на человеческом языке.
Есть ещё такая штука, называется Wolfram Cloud. Это, пожалуй, вам подойдёт (но не факт, что предлагаемые забесплатно вычислительные мощности вас устроят).

[Nataly-Mak]

Aritaborian в сообщении #1050003 писал(а):

Здесь[/url]. Исчерпывающая документация с огромным количеством примеров. Это описание именно Wolfram Language...

Aritaborian
большое спасибо.
Но... там ведь всё на английском? А я не знаю английского.
Возможно, это поможет другим участникам проекта.

Цитата:

...не путайте с языком запросов к Альфе, документации к которому не существует в принципе, ибо не существует самого языка: Альфа изначально ориентирована на запросы на человеческом языке.

Ну, в принципе, может быть, и не существует.
Но вряд ли вот такая команда

Select[Range[400000000*9699690+5850211,400090000*9699690,9699690], PrimeQ[(#)]&&PrimeQ[(#+6)]&&PrimeQ[(#+12)]&&PrimeQ[(#+30)]&&PrimeQ[(#+180)]&&PrimeQ[(#+240)]&&PrimeQ[(#+246)]&&PrimeQ[(#+252)]&]

должна быть известна всем априори - как команда "человеческого языка".
Наверное, всё-таки коды команд обращения к Wolfram Alpha в онлайне тоже где-то описаны. Очень может быть, что они описаны прямо там (в онлайн-WA, но там опять же всё по-английски).

Далее, можно написать скрипт обращения к WA, который, предполагаю, может выполнить целый ряд таких команд и записать в файл результаты (но это только предполагаю). Например, выполнить приведённую команду не в одном интервале, а в 100, и не для одной формулы кортежа, а для 30 формул.

В любом случае, ещё раз спасибо за ссылку на описание языка программирования Wolfram Language.
Это может кому-то помочь.