合成方法论群论的兄弟篇

白新岭

截止2022年12月16日周五22:11分农历十一月廿三，浏览量29675，回复1882，热度89
截止2022年12月17日周五10:04分农历十一月廿四，浏览量29724，回复1883，热度89

白新岭

八生素        记录8
67        19
73        21
97        25
21613        2428
26737        2936
129037        12080
844483        67221
2073403        154008
3992257        282649
4889293        341268
6184693        424668
11900557        781938
21456103        1356998
24598417        1542359
33771637        2076248
34864267        2138920
50943847        3054336
51448417        3082743
51867253        3106371
55794007        3326786
56421403        3361965
61218307        3630128
67787593        3995535
69726703        4102995
76345177        4468526
85776193        4986229
86145937        5006480
86966827        5051366
90261763        5231336
92865847        5373422
93685357        5417982
97122253        5605198
99624703        5741138
102960337        5922152
107599813        6173356
108846217        6240935
110550667        6332934
113575783        6496159
118136323        6741545
122983087        7001759
132021103        7486300
162213463        9091544
165505633        9265632
172039633        9610813
178016107        9925877
180078373        10034516
183919147        10235959
197289397        10937267
207664453        11479664
207771463        11485300
232728703        12784275
234731557        12887998
258735847        14130717
260257087        14209137
286568587        15563320
307197097        16620936
310447507        16787412
316973677        17120882
333294373        17953283
342242023        18408951
382427083        20448332
382533367        20453712
426676123        22680889
462638497        24486889
470463067        24878948
476710363        25191466
482693557        25491055
483040813        25508442
494734183        26092817
501038173        26407741
507879007        26748535
526517527        27677139
527153647        27708787
545452543        28619150
558791383        29282228
564537817        29567306
591360907        30897119
603413857        31493844
655713727        34074776
671731483        34863534
676909033        35118057
695138317        36014268
708476983        36669213
722508937        37357213
749930773        38699801
778640047        40102993
782113483        40272776
838115767        43003695
840472363        43118405
853838863        43768584
866832103        44399792
901288573        46071916
923834323        47165174
925594513        47250443
926976487        47317467
932187463        47569402
938809507        47890063
960959437        48961860
965761453        49193996
\(X^2+X+P\)型的等差8生素数

白新岭

SELECT 1
USE d:\二次等差素数数列\素数表.DBF ALIAS 素数表
SELECT 2
USE d:\二次等差素数数列\二次等差八生.DBF ALIAS 等差八生
SELECT 3
USE d:\二次等差素数数列\二次等差九生.DBF ALIAS 等差九生
kssj=SECONDS()
For i=1 to 99
      @ 5,12 say i
     SELECT 2
     jl8=记录8
    SELECT  1
    GO jl8
    jl=recno() &&记录指针位置
    PUBLIC A
    A=素数
    skip
    FOR j=1 TO 5
       n=j
    SELECT 1
    PUBLIC B
    B=素数
    cj=B-A
    IF cj=16
         SELECT 3
         APPEND BLANK     &&增加一条空记录
         REPLACE 九生素 WITH A+16
         REPLACE 记录9 WITH jl+n
         exit
    ENDIF
      SELECT 1
      skip
   ENDFOR
   SELECT 2
   skip
   ENDFOR
    =MESSAGEBOX("运行时间："+LTRIM(STR(INT((SECONDS()-kssj)/60)))+"分"+LTRIM(STR(MOD(SECONDS()-kssj,60),5,2))+"秒",64,"运行时间提示")

白新岭

九生素        记录9
83        23
89        24
113        30
844499        67223
51448433        3082744
51867269        3106373
85776209        4986230
86966843        5051368
93685373        5417983
97122269        5605199
107599829        6173357
113575799        6496160
118136339        6741548
122983103        7001761
180078389        10034518
232728719        12784276
316973693        17120884
483040829        25508443
564537833        29567307
749930789        38699803
840472379        43118406
901288589        46071917
960959453        48961861

白新岭

SELECT 1
USE d:\二次等差素数数列\素数表.DBF ALIAS 素数表
SELECT 2
USE d:\二次等差素数数列\二次等差九生.DBF ALIAS 等差九生
SELECT 3
USE d:\二次等差素数数列\二次等差十生.DBF ALIAS 等差十生
kssj=SECONDS()
For i=1 to 23
      @ 5,12 say i
     SELECT 2
     jl9=记录9
    SELECT  1
    GO jl9
    jl=recno() &&记录指针位置
    PUBLIC A
    A=素数
    skip
    FOR j=1 TO 6
       n=j
    SELECT 1
    PUBLIC B
    B=素数
    cj=B-A
    IF cj=18
         SELECT 3
         APPEND BLANK     &&增加一条空记录
         REPLACE 十生素 WITH A+18
         REPLACE 记录10 WITH jl+n
         exit
    ENDIF
      SELECT 1
      skip
   ENDFOR
   SELECT 2
   skip
   ENDFOR
    =MESSAGEBOX("运行时间："+LTRIM(STR(INT((SECONDS()-kssj)/60)))+"分"+LTRIM(STR(MOD(SECONDS()-kssj,60),5,2))+"秒",64,"运行时间提示")

白新岭

十生素        记录10
101        26
107        28
131        32
844517        67227
51448451        3082745
86966861        5051370
122983121        7001764
180078407        10034520
960959471        48961862
在10亿内，二次等差素数数列，10生的不足10组，看来找到一个40生，势必登天还难。

独木星空谁

截止2022年12月16日周五22:11分农历十一月廿三，浏览量29675，回复1882，热度89
截止2022年12月18日周日00:21分农历十一月廿五，浏览量29770，回复1889，热度89

独舟星海

截止2022年12月18日周日00:21分农历十一月廿五，浏览量29770，回复1889，热度89
截止2022年12月18日周日10:29分农历十一月廿五，浏览量29789，回复1890，热度89

白新岭

SELECT 1
USE d:\二次等差素数数列\素数表.DBF ALIAS 素数表
SELECT 2
USE d:\二次等差素数数列\二次等差十生.DBF ALIAS 等差十生
SELECT 3
USE d:\二次等差素数数列\二次等差11生.DBF ALIAS 等差11生
kssj=SECONDS()
For i=1 to 9
      @ 5,12 say i
     SELECT 2
     jl10=记录10
    SELECT  1
    GO jl10
    jl=recno() &&记录指针位置
    PUBLIC A
    A=素数
    skip
    FOR j=1 TO 6
       n=j
    SELECT 1
    PUBLIC B
    B=素数
    cj=B-A
    IF cj=20
         SELECT 3
         APPEND BLANK     &&增加一条空记录
         REPLACE 生素11 WITH A+20
         REPLACE 记录11 WITH jl+n
         exit
    ENDIF
      SELECT 1
      skip
   ENDFOR
   SELECT 2
   skip
   ENDFOR
    =MESSAGEBOX("运行时间："+LTRIM(STR(INT((SECONDS()-kssj)/60)))+"分"+LTRIM(STR(MOD(SECONDS()-kssj,60),5,2))+"秒",64,"运行时间提示")

白新岭

截止2022年12月18日周日00:21分农历十一月廿五，浏览量29770，回复1889，热度89
截止2022年12月18日周日15:35分农历十一月廿五，浏览量29811，回复1892，热度90