2014 dxdy logo

Научный форум dxdy

Математика, Физика, Computer Science, Machine Learning, LaTeX, Механика и Техника, Химия,
Биология и Медицина, Экономика и Финансовая Математика, Гуманитарные науки




Начать новую тему Ответить на тему На страницу Пред.  1 ... 36, 37, 38, 39, 40, 41, 42 ... 48  След.
 
 Re: кортежи последовательных простых. ключ к 19-252
Сообщение24.05.2024, 13:21 
Аватара пользователя


29/04/13
7441
Богородский
А я ленюсь делать полноценное расщепление второго порядка.

Вот вроде бы единственное сравнение сразу по нескольким периодам:

Dmitriy40 в сообщении #1639242 писал(а):
Итого 2ч48м. Вместо 3ч44м. На треть быстрее.
Экономия памяти где-то на порядок (точнее не измерял).

А ведь можно было и не умножать на 2, а пройтись по всем паттернам, как это нужно будет делать для расщеплений последующих порядков.

Ну и нет сомнений, что около 5 с половиной часов получится.

 Профиль  
                  
 
 Re: кортежи последовательных простых. ключ к 19-252
Сообщение24.05.2024, 13:48 
Заслуженный участник


20/08/14
11386
Россия, Москва
Интересна зависимость размера второй таблицы (только для одного самого плохого элемента первой) от размера первой (без расщепления):
37#->71#: 60млн
41#->71#: 14млн
43#->71#: 3млн
47#->71#: 0.54млн
Ну и рост размера второй таблицы для наиболее удобного варианта 41#->:
41#->61#: 0.44млн
41#->67#: 2.9млн
41#->71#: 14млн
41#->73#: 44млн
41#->79#: 114млн
Всё ещё совсем непохоже на насыщение размера, что не позволяет отказаться от третьей таблицы и вложенного перебора. :-(

 Профиль  
                  
 
 Re: кортежи последовательных простых. ключ к 19-252
Сообщение24.05.2024, 15:38 
Аватара пользователя


29/04/13
7441
Богородский
Слева, видимо, значение pmid.

Я вот думаю, что надо подналечь на более короткие и узкие паттерны, может в процессе их обсчёта и сбора статистики ещё придут идеи ускорения. Вот закончу 1-й 11-156, а дальше вроде 2 раза подряд увеличение длины: не только 13-168, но и 15-180 ...

 Профиль  
                  
 
 Re: кортежи последовательных простых. ключ к 19-252
Сообщение24.05.2024, 18:07 
Заслуженный участник


20/08/14
11386
Россия, Москва
gris
Посчитал все 13-192 до 1.1e19. Нашёл одну пропущенную у Томаша:
3547548469412787251: 0 12 42 60 66 90 96 102 126 132 150 180 192
Её потом ещё НМ нашла.
И пропущенные (в недосчитанном куске) в SPT боинк проекте:
4958268923153051357: 0 12 42 60 66 90 96 102 126 132 150 180 192
5056116626025313091: 0 12 42 60 66 90 96 102 126 132 150 180 192
5064597206418405221: 0 12 42 60 66 90 96 102 126 132 150 180 192
5081754393702091957: 0 12 42 60 66 90 96 102 126 132 150 180 192
5154020923551309767: 0 12 42 60 66 90 96 102 126 132 150 180 192
Плюс совсем скоро там найдут и последнюю перед 1e19 (предыдущие уже нашли):
9995348564889375931: 0 12 42 60 66 90 96 102 126 132 150 180 192
Итого до 1e19 их будет 216шт.
После 1e16 нашёл следующие 23шт 13-192:
10013230717641471277: 0 12 42 60 66 90 96 102 126 132 150 180 192
10130392328070474157: 0 12 42 60 66 90 96 102 126 132 150 180 192
10153185061549088971: 0 12 42 60 66 90 96 102 126 132 150 180 192
10236355150921661327: 0 12 42 60 66 90 96 102 126 132 150 180 192
10246017460829141557: 0 12 42 60 66 90 96 102 126 132 150 180 192
10304613318488232701: 0 12 42 60 66 90 96 102 126 132 150 180 192
10326541662008009681: 0 12 42 60 66 90 96 102 126 132 150 180 192
10371425130288542017: 0 12 42 60 66 90 96 102 126 132 150 180 192
10383682450304082877: 0 12 42 60 66 90 96 102 126 132 150 180 192
10408168773472119061: 0 12 42 60 66 90 96 102 126 132 150 180 192
10499493692947708861: 0 12 42 60 66 90 96 102 126 132 150 180 192
10540143033014354611: 0 12 42 60 66 90 96 102 126 132 150 180 192
10560397483948992091: 0 12 42 60 66 90 96 102 126 132 150 180 192
10567963099523203771: 0 12 42 60 66 90 96 102 126 132 150 180 192
10607521634695145011: 0 12 42 60 66 90 96 102 126 132 150 180 192
10716366929681877161: 0 12 42 60 66 90 96 102 126 132 150 180 192
10717708445691097247: 0 12 42 60 66 90 96 102 126 132 150 180 192
10723236960793555441: 0 12 42 60 66 90 96 102 126 132 150 180 192
10732242437627290537: 0 12 42 60 66 90 96 102 126 132 150 180 192
10861110627532434967: 0 12 42 60 66 90 96 102 126 132 150 180 192
10960719362282020897: 0 12 42 60 66 90 96 102 126 132 150 180 192
10962757032949087217: 0 12 42 60 66 90 96 102 126 132 150 180 192
10965448136607379981: 0 12 42 60 66 90 96 102 126 132 150 180 192

До 15-228 расширяются только две уже известные:
2079914861571286679: 0 18 30 60 78 84 108 114 120 144 150 168 198 210 228
3665619319531504883: 0 18 30 60 78 84 108 114 120 144 150 168 198 210 228

 Профиль  
                  
 
 Re: кортежи последовательных простых. ключ к 19-252
Сообщение25.05.2024, 06:40 
Аватара пользователя


29/04/13
7441
Богородский
Dmitriy40 в сообщении #1640158 писал(а):
Посчитал все 13-192 до 1.1e19.

Почему бы уж тогда не посчитать все 13-168 до 1e19. Их количество ведь потенциально можно сравнить и посчитать кэф превышения.

Или центральные 13-ки имеют самостоятельную ценность? Ну, может быть. Но тогда и 13-168 имеют самостоятельную ценность, да и другие цепочки тоже.

Dmitriy40 в сообщении #1639969 писал(а):
Скоро (не обязательно на следующем простом, может и через одно-два) видимо придётся увеличивать pmid чтобы уменьшить второй размер.

Не пришлось. Второй размер — 1.9 млн для 71#. Счёт длился 31 час. g2[] уже нулевой.

(11-156-1-71#)

Код:
11     [0, 6, 30, 36, 66, 78, 90, 120, 126, 150, 156]


cg  o = 1 --> 71#: [5397242, 1444137442, 122592880532, 4924450701438, 1117072869
11238, 1579406489257020, 14782616387894048, 95122817579577582, 43090166566976584
0, 1393871571674830322, 3244127925542407278, 5445557844514820376, 65809342683053
95830, 5697450212287280000, 3510471835719480356, 1531752226101696968, 4746465843
35652158, 106310039876375860, 17664135862043230, 2159892797232040, 1756570460232
00, 7139543040000], sum=28547632595512800000, #ww[]=862+1903560, time : 15h, 27m
in, 6,127 ms

cg  o = 2 --> 71#: [314235140, 43197876390, 2067687268402, 49657179022168, 71068
2775634550, 6710368219456656, 44523310051790212, 215705971570426020, 78010385859
6537942, 2128846508773713126, 4394847654845146276, 6840246052548775896, 79679043
39590081444, 6880236220977675756, 4357967099852065774, 2004319320790037980, 6639
30562679695056, 157618170671700664, 26667958166453024, 3141704262018464, 2374570
63125060, 8691508224000], sum=36473777701320960000, #ww[]=997+1926622, time : 31
h, 38min, 23,915 ms


24  cg = [0, 319632382, 44642013832, 2190280148934, 54581629723606, 822390062545
788, 8289774708713676, 59305926439684260, 310828789150003602, 121100552426630378
2, 3522718080448543448, 7638975580387553554, 12285803897063596272, 1454883860789
5477274, 12577686433264955756, 7868438935571546130, 3536071546891734948, 1138577
147015347214, 263928210548076524, 44332094028496254, 5301597059250504, 413114109
148260, 15831051264000, 0]    65021410296833760000

time: 31h, 38min, 24,095 ms



2  do = [2, 4]

g2  o = 1 --> 71#: [0], sum=0, #ww[]=0+0, time : 13 ms

g2  o = 2 --> 71#: [0], sum=0, #ww[]=0+0, time : 17 ms


25  g2 = [0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0
, 0]    0

time: 22 ms


vc  -->  71# : [8615676236, 1219507630880, 64188686107016, 1758252393107966, 291
93400227501994, 321246902459508228, 2480373791675579850, 13941455780369712060, 5
8342157668863403964, 183919196668057248918, 438350747504636460128, 7882689763384
39220936, 1063261933667299106358, 1066734787397413923222, 787956344439019242204,
423879413603993325660, 164475574778029719768, 45821499624722434408, 92073629553
32355018, 1348958939318951802, 142794108869125784, 10022021770881600, 3461083637
76000, 0]      5048494209368064000000


time: 31h, 38min, 24,141 ms

После отдыха запущен новый счёт уже до финальной предокейной 73#. Надеюсь, продлится не более 3-х суток.

 Профиль  
                  
 
 Re: кортежи последовательных простых. ключ к 19-252
Сообщение25.05.2024, 12:32 
Заслуженный участник


20/08/14
11386
Россия, Москва
Yadryara в сообщении #1640189 писал(а):
Почему бы уж тогда не посчитать все 13-168 до 1e19.
А чем не устраивает выборка таких цепочек из боинка? Они практически до 1e19 уже досчитали. И цепочек таких там 219шт (всего, с нуля). Ну да, может штук 5-8 пропущено, но это всего 5% погрешности кэфа.

Yadryara в сообщении #1640189 писал(а):
Или центральные 13-ки имеют самостоятельную ценность?
Да - из них образуются 15-228, 17-240 и искомая 19-252. К тому же именно про них задавали выше вопрос про аппроксимацию.
Но вообще мне просто было интересно есть ли пропущенные цепочки, и в недосчитанных интервалах, и в просчитанных, и 4 дня счёта (в 4 потока) приемлемая цена за вопрос. Оказалось во вторых нету, это хорошо, повышает доверие к результатам. Но хорошо, запустил и 13-168 просчитаться, на них 2 дня хватит.

Yadryara в сообщении #1640189 писал(а):
для 71#. Счёт длился 31 час.
О как, а моя программа на асме в 4 потока собралась считать 61# аж неделю! Про 71# и 73# вообще молчу. Что значит замена вложенного перебора (31#->61#) на линейный (pmid#->71#). И расщепление тоже явно сильно помогло.

 Профиль  
                  
 
 Re: кортежи последовательных простых. ключ к 19-252
Сообщение25.05.2024, 15:08 
Аватара пользователя


29/04/13
7441
Богородский
Dmitriy40 в сообщении #1640211 писал(а):
А чем не устраивает выборка таких цепочек из боинка?

Психологически некомфортно из-за потенциальных пропусков. Хоть их и немного.

Dmitriy40 в сообщении #1640211 писал(а):
Но хорошо, запустил и 13-168 просчитаться, на них 2 дня хватит.

Надеюсь только в промежутках считаете. Раз есть доверие к боинкам.

Dmitriy40 в сообщении #1640211 писал(а):
Да - из них образуются 15-228, 17-240 и искомая 19-252. К тому же именно про них задавали выше вопрос про аппроксимацию.

Ну вот и у меня вопрос к gris. 19-252 здесь всё равно не найдётся.

Dmitriy40 в сообщении #1640211 писал(а):
И расщепление тоже явно сильно помогло.

Первого порядка конечно помогает. Но неужели расщепление второго порядка поможет в плане скорости?

 Профиль  
                  
 
 Re: кортежи последовательных простых. ключ к 19-252
Сообщение25.05.2024, 17:50 
Аватара пользователя


29/04/13
7441
Богородский
Кстати, насчёт аппроксимации. Раз простые числа являются строительными кирпичиками кортежей, то и в формуле надо использовать либо интегральный логарифм, либо другие способы вычисления $\pi(x)$. Ну и книжку Дербишира никто не отменял.

 Профиль  
                  
 
 Re: кортежи последовательных простых. ключ к 19-252
Сообщение26.05.2024, 10:07 
Заслуженный участник


20/08/14
11386
Россия, Москва
Насколько я понял о таких сложных материях как распределение простых чисел никто и не заморачивался, пытались строить аппроксимацию от фонаря, просто таблицы чисел, без учёта их природы. Я выше тоже.

В интервале 1.1-1.2e19 есть ещё 17шт 13-192. До 15-228 не расширяются.

Yadryara в сообщении #1640225 писал(а):
Надеюсь только в промежутках считаете. Раз есть доверие к боинкам.
Разумеется нет, полностью. 2 дня не сильно жалко. А на только пропуски хватило бы пары часов.

Yadryara в сообщении #1640225 писал(а):
Но неужели расщепление второго порядка поможет в плане скорости?
Думаю да, сразу по двум причинам: и паттерны станут длиннее и соответственно размеры таблиц станут увеличиваться медленнее что позволит лучше учесть уникальность элементов и позже переходить к вложенным переборам (или не переходить вообще); плюс возможно количество паттернов будет меньше увеличения скорости (вон у Вас вообще всего два паттерна для 71# считались как я понял).

 Профиль  
                  
 
 Re: кортежи последовательных простых. ключ к 19-252
Сообщение26.05.2024, 12:12 
Аватара пользователя


29/04/13
7441
Богородский
Dmitriy40 в сообщении #1640299 писал(а):
Насколько я понял о таких сложных материях как распределение простых чисел никто и не заморачивался, пытались строить аппроксимацию от фонаря, просто таблицы чисел, без учёта их природы.

Довольно странно. Ведь мы учитывали распределение простых чисел много когда. Например, когда речь шла о 12 делителях. Ну а тут-то куда от простых деваться если из них и строим. Например, самый популярный гэп из подходящих долгое время равен 6, а потом на первое место выходит не 12 и не 18, а 24.

Dmitriy40 в сообщении #1640299 писал(а):
Разумеется нет, полностью.

Интересно... То есть Вы считаете, что перепроверить всё же не помешает. Иначе какой смысл 2 дня вместо двух часов.

Dmitriy40 в сообщении #1640299 писал(а):
вон у Вас вообще всего два паттерна для 71# считались как я понял

Да, правильно понято.

Эх, сейчас немного некогда...

 Профиль  
                  
 
 Re: кортежи последовательных простых. ключ к 19-252
Сообщение26.05.2024, 14:01 
Заслуженный участник


20/08/14
11386
Россия, Москва
Yadryara в сообщении #1640308 писал(а):
Интересно... То есть Вы считаете, что перепроверить всё же не помешает.
Ну да.
Во первых не вполне понятно где точно нижняя граница недосчитанного интервала, например между предпоследней и последней цепочкой 13-168 перед разрывом нашёл ещё одну:
4830075992994769333: 0 18 24 48 60 78 84 90 108 120 144 150 168 - была
4874789823823097579: 0 18 24 48 60 78 84 90 108 120 144 150 168 - новая
4890492034527070403: 0 18 24 48 60 78 84 90 108 120 144 150 168 - была
Во вторых не факт что пропущенный интервал у Томаша 3.53-3.56e18 НМ&Ко досчитала корректно (полные данные она не выкладывала так что проверить невозможно, только верить на слово).
В третьих в обоих проектах есть ошибочные цепочки, значит теоретически могут быть и пропущенные (у Томаша все ошибочные я пересчитал сам, ничего интересного не обнаружил, но попадает ли 13-168 в разряд интересного не помню, в SPT они будут когда-то пересчитаны самим проектом, но неизвестно когда).
Так что проще задать полный диапазон, запустить и пусть само считает, чем разбираться где точно что пропущено. 2 дня не столь много, не жалко.

 Профиль  
                  
 
 Re: кортежи последовательных простых. ключ к 19-252
Сообщение26.05.2024, 18:25 
Заслуженный участник


20/08/14
11386
Россия, Москва
Зато во всём недосчитанном интервале 4.89e18-5.248e18 нашлась всего одна новая цепочка 13-168:
5110045405206766183: 0 18 24 48 60 78 84 90 108 120 144 150 168
А я то думал их там штук 7 могло быть ...

 Профиль  
                  
 
 Re: кортежи последовательных простых. ключ к 19-252
Сообщение26.05.2024, 19:28 
Аватара пользователя


29/04/13
7441
Богородский
Флуктуации. И у меня тоже: то 28 часов, то всего лишь 5. Если желаете можете добавить в Ваш файл. Сверка с другим способом подсчёта была только до 43# включительно.

(11-156-1)

Код:
11     [0, 6, 30, 36, 66, 78, 90, 120, 126, 150, 156]


cg  o = 1 --> 73#: [35101303862, 4414188471544, 204157705869568, 488521714645662
6, 70651073333495156, 676015539480280036, 4530290136340202878, 22028954658410771
424, 79268421106145707764, 212793792336382713454, 426260123918398530842, 6341856
76791568579484, 695331325905782305512, 556277933301315827882, 321198241723461304
614, 132553899146922252914, 38918799831162003442, 8175239185576544036, 124524046
7793283578, 136530717594944344, 9857355098495040, 346108363776000], sum=31336664
33127273120000, #ww[]=1580+2027335, time : 28h, 27min, 31,924 ms

cg  o = 2 --> 73#: [42346860, 12649974404, 1205316486876, 53065169154780, 128405
5958618062, 18933543577291840, 181982277612147430, 1193151907955524558, 54994280
88814085774, 18157365979117805590, 43382681105991045238, 75283862747093711622, 9
4785285749518807668, 86209880807573654130, 56296138410088480788, 262176381919663
72792, 8647073204172826748, 1998960278215560540, 316932799877361660, 33114847941
068240, 2111166545498400, 60526642176000], sum=418225939971840000000, #ww[]=189+
2043840, time : 33h, 59min, 32,298 ms


24  cg = [0, 35143650722, 4426838445948, 205363022356444, 4938282315611406, 7193
5129292113218, 694949083057571876, 4712272413952350308, 23222106566366295982, 84
767849194959793538, 230951158315500519044, 469642805024389576080, 70946953953866
2291106, 790116611655301113180, 642487814108889482012, 377494380133549785402, 15
8771537338888625706, 47565873035334830190, 10174199463792104576, 156217326767064
5238, 169645565536012584, 11968521643993440, 406635005952000, 0]    355189237309
9113120000

time: 33h, 59min, 32,342 ms




1  do = [2]

g2  o = 1 --> 73#: [0], sum=0, #ww[]=0+0, time : 15 ms


25  g2 = [0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0
, 0]    0

time: 17 ms


vc  -->  73# : [1718535906790, 198375642902486, 8925142161834362, 21577757281012
3008, 3232454878516154980, 32570302236479989438, 232473799465525677588, 12150074
95118827449338, 4744203541502545556762, 13985041589332858068428, 312265059632550
38299916, 52721034262753716829006, 66950001847414697497712, 63449022202165963259
902, 44445089171108163207302, 22772664478630822982004, 8456047597713202289780, 2
265091689880034664298, 439366216077805164368, 62253644270232075820, 636549207358
3815672, 430079163247259040, 14250969556992000, 0]      313006640980819968000000



time: 33h, 59min, 32,365 ms

 Профиль  
                  
 
 Re: кортежи последовательных простых. ключ к 19-252
Сообщение27.05.2024, 07:33 
Аватара пользователя


29/04/13
7441
Богородский
Yadryara в сообщении #1640362 писал(а):
Сверка с другим способом подсчёта была только до 43# включительно.

Проверил кэф превышения и долю чистых:

Код:
1. [0, 6, 30, 36, 66, 78, 90, 120, 126, 150, 156]

1     E14      1.494     2.5 %        8

1     E15      1.637     3.3 %       45

1     E16      1.780     4.1 %      258

1     E17      1.949     5.1 %     1487

1     E18      2.028     6.1 %     9132

2.148 E18      2.050     6.5 %    16769


Сводная таблица:

Код:
Паттерн      От 0 до   Kпревыш.   Чистых    Кортежей  Обсч/Пат

   9- 84    1     E16    1.894    25.3 %      81588      1/  1
   9- 96    1     E16    1.826    17.5 %      87501      1/  1
   9-108    1     E16    1.788    12.8 %      87326      1/  1
   9-120    1     E16    1.735     9.0 %     442966      7/  7
   9-132    1     E16    1.675     5.9 %     488223      8/  8
  11-132    1     E16    1.961     8.2 %        962      2/  2
  11-144    1     E16    1.970     5.7 %       1571      4/  4
  11-156    1     E16    1.780     4.1 %        258      1/  5

  11-132    2.148 E18    2.166    11.6 %      59143      2/  2
  11-144    2.148 E18    2.106     8.5 %     104962      4/  4
  11-156    2.148 E18    2.050     6.5 %      16769      1/  5

Похоже на правду. Программа:

(PARI)

Код:
{print();

k = 14;

f = [ 0, 0, 0,   0, 0, 0,   0, 0, 0,   0, 0,

     1,  0,  8, 45, 258, 1487,  9132, 16769];

\\  12  13  14  15   16    17     18    end


mor=[ 0, 0, 0,   0, 0, 0,   0, 0, 0,   0, 0,

1.4705552760839308761649229845696490594 E433636,
1.7536647295156189735811651573073679657 E1372340,
1.6725476714034538506990478976102144813 E4340851,
4.0129671196962765407337488720246638814 E13731288,
2.5401483842215342462788890842604146196 E43424119,
2.0482350313774922452835522308588480309 E137328734,
2.9557521529413355924858770497467279652 E134281009,
6.1501327818293311097988392787319372235 E136486324 ];

\\print(mor);


vc=[1718535906790, 198375642902486, 8925142161834362, 21577757281012
3008, 3232454878516154980, 32570302236479989438, 232473799465525677588, 12150074
95118827449338, 4744203541502545556762, 13985041589332858068428, 312265059632550
38299916, 52721034262753716829006, 66950001847414697497712, 63449022202165963259
902, 44445089171108163207302, 22772664478630822982004, 8456047597713202289780, 2
265091689880034664298, 439366216077805164368, 62253644270232075820, 636549207358
3815672, 430079163247259040, 14250969556992000];
\\ 73# , sum=

cm=11; c=vc*1.0;


forprime(p=73+1,sqrt(2.148e18),


while(p^2>10^k,

print(k,"      ",c[1]*10^k/mor[k]/f[k],"      ",round(c[1]/vecsum(c)*10^3));

print();
print();

k++);

\\mor

if(c[1]>1e160000000,

kpon++;
print();
print(kpon);
print();

for(i=1,#c, c[i]=c[i]/(1e160000000);

print(c[i]);

);
print();
);

for(i=1,#c-1, c[i]=c[i]*(p-i-cm+1)+c[i+1]*i);

c[#c]*=p-#c-cm+1);


print();
print(k,"      ",c[1]*2.148e18/mor[k]/f[k],"      ",round(c[1]/vecsum(c)*10^3));

print();

}quit;

А вот так я выцеплял нужные количества цепочек из Базы 11-к:

(PARI)

Код:
{print();

x=fileopen("spt11.txt","r");

v=[0, 6, 30, 36, 66, 78, 90, 120, 126, 150, 156];

f=vector(19);
y=vector(12);
t=vector(12);
sto=1;


for(i=1, 9042039,



ksov=0;

s=filereadstr(x);

for(j=1,12,y[j]=strsplit(s," ")[j];

if(j>=2,t[j]=eval(y[j]);

if(t[j]==v[j-1],ksov++)));



z=eval(strsplit(y[1],":"));

\\print(z[1], "   ",y[1]);



if(ksov==11, k11++;


for(st=sto,18,
if(z[1]<10^st,f[st]++;

if(st>sto,f[st]=f[st]+f[sto];sto=st;

if(f[st]==1,k=st);

print(k11, "   ",f);print();
);

next(2)));


);
);

print();print();
print(k, "   ",k11, "   ",f);print();

print();
print();


}quit;

 Профиль  
                  
 
 Re: кортежи последовательных простых. ключ к 19-252
Сообщение27.05.2024, 10:40 
Заслуженный участник


20/08/14
11386
Россия, Москва
Yadryara в сообщении #1640404 писал(а):
А вот так я выцеплял нужные количества цепочек из Базы 11-к:
Зачем такие сложности? Так проще:
Код:
x=fileopen("spt11.txt","r");
v=[0, 6, 30, 36, 66, 78, 90, 120, 126, 150, 156];
vv=concat(" ",strjoin(v," ")); k11=0; f=vector(20);\\Готовим строку для сравнения
{while(s=filereadstr(x),
ss=strsplit(s,":"); if(#ss!=2 || ss[2]!=vv, next);\\Делим строку на части и пропускаем всё что не цепочка
k11++; z=eval(ss[1]); sto=0; while(z>10^sto, sto++); f[sto]++;\\Десятичный логарифм начального числа
);}
fileclose(x); for(z=2,#f, f[z]+=f[z-1]); print(f,", all=",k11);\\Меньшие цепочки добавляем к большим
quit;

 Профиль  
                  
Показать сообщения за:  Поле сортировки  
Начать новую тему Ответить на тему  [ Сообщений: 716 ]  На страницу Пред.  1 ... 36, 37, 38, 39, 40, 41, 42 ... 48  След.

Модераторы: Модераторы Математики, Супермодераторы



Кто сейчас на конференции

Сейчас этот форум просматривают: нет зарегистрированных пользователей


Вы не можете начинать темы
Вы не можете отвечать на сообщения
Вы не можете редактировать свои сообщения
Вы не можете удалять свои сообщения
Вы не можете добавлять вложения

Найти:
Powered by phpBB © 2000, 2002, 2005, 2007 phpBB Group