偶数的哥猜解个数的接近实际的下限公式

ysr

p=1206701  p1=1206703
p=1278029  p1=1278031
p=1321349  p1=1321351
p=1424441  p1=1424443
p=1441199  p1=1441201
用时0.7402344秒

ysr

p=1481  p1=1483
p=1721  p1=1723
p=2549  p1=2551
p=2969  p1=2971
p=3539  p1=3541
p=4421  p1=4423
p=8009  p1=8011
p=10301  p1=10303
p=17291  p1=17293
用时3.90625E-03秒 ， 数据小的时候能找到很多孪生素数，数据大的时候很难找出来

ysr

p=1099510584971  p1=1099510584973
用时27.6875秒代码如下：

Private Sub Command1_Click() '快速找孪生素数
Dim A, B
a1 = Text1: B1 = Text2
ts = Timer
A2 = ksm2(Val(a1))
s = 5201
Do While Val(s) <= B1
A = Trim(A2)
p = MPC(MbC(Trim(A), Trim(A)), Trim(A))
p = MPC1(Trim(p), Trim(s))
c = fenjieyinzi0(Trim(p))
If InStr(c, "*") = 0 Then
p1 = MPC1(Trim(p), 2)
C1 = fenjieyinzi0(Trim(p1))
If InStr(C1, "*") = 0 Then
s2 = s2 + 1
s1 = s1 & "p=" & p & "  p1=" & p1 & vbCrLf
End If
End If

s = s + 2
Loop

If Val(s2) > 0 Then
Text3 = s1 & "用时" & Timer - ts & "秒"
Else
Text3 = "wu  jie    " & "用时" & Timer - ts & "秒"
End If

End Sub

Private Sub Command2_Click()
Text1 = ""
Text2 = ""
Text3 = ""

End Sub

ysr

m=a（a-1），p=m-b，当a=2^100，b=12601~13801时，油：
p=1606938044258990275541962092339894951921974764381296132082631  p1=1606938044258990275541962092339894951921974764381296132082633
用时-76808.27秒，孪生素数对一个

代码如下：
Private Sub Command1_Click() '快速找孪生素数
Dim A, B
a1 = Text1: B1 = Text2
ts = Timer
A2 = ksm2(Val(a1))
s = 12601
Do While Val(s) <= B1
A = Trim(A2)
p = MPC(MbC(Trim(A), Trim(A)), Trim(A))
p = MPC(Trim(p), Trim(s))
c = fenjieyinzi0(Trim(p))
If InStr(c, "*") = 0 Then
p1 = MPC1(Trim(p), 2)
C1 = fenjieyinzi0(Trim(p1))
If InStr(C1, "*") = 0 Then
s2 = s2 + 1
s1 = s1 & "p=" & p & "  p1=" & p1 & vbCrLf
End If
End If

s = s + 2
Loop

If Val(s2) > 0 Then
Text3 = s1 & "用时" & Timer - ts & "秒"
Else
Text3 = "wu  jie    " & "用时" & Timer - ts & "秒"
End If

End Sub

Private Sub Command2_Click()
Text1 = ""
Text2 = ""
Text3 = ""

End Sub

ysr

最新版数论探秘的目录：
第一章  孪生素数猜想和哥德巴赫猜想的初等证明
第一节  几个概念......................................................1
第二节  孪生素数猜想的证明和哥德巴赫猜想的证明..........................3
第三节  抛物线数列中的孪生素数对和相邻素数对的差的定理..................6
第四节  孪生素数对总个数及其分布规律....................................10
第五节  差为2,4,6,8，……的相邻素数对是无穷多的........................12
第六节  抛物线数列中素因子的周期性和同一周期中的对称性.................12
第二章  哥德巴赫猜想成立的必要条件和充分条件
第一节  哥德巴赫猜想成立的条件.........................................13
第二节  哥德巴赫猜想解的个数的绝对下限.................................14
第三节  偶数哥德巴赫猜想解中的最小素数的求证...........................24
第四节  偶数的哥猜拆分素数和对的下限公式及程序等.......................29
第三章  素数分布规律和哥德巴赫猜想的验证
第一节  素数的分布规律.................................................30
第二节  哥德巴赫猜想的验证.............................................32
第三节  某数内相邻素数的最大间距的公式及推导...........................33
第四章  研究素数的几个常用公式
第一节  几个常用公式...................................................37
第二节  我证明的定理...................................................39
第三节  关于素数对个数的几个命题.......................................40
第四节  关于精确的素数个数公式和素数对个数公式及哥德巴赫猜想解个数公式的
推导和探索.....................................................41
第五节  差为2m的素数对个数的比例以及特殊K生素数探索……………………48
第五章  费尔马大定理的初等证明
第一节  费尔马大定理的初等证明.........................................49
第二节  证明a^(2/3),b^(2/3),c^(2/3)之中(abc为勾股数)必有1个无理数....69
第三节  勾股小题（1）..................................................72
第四节  勾股小题（2）..................................................72
第六章  知识储备
第一节  费尔马小定理.........................................74
第二节  欧拉原理等...........................................74
第三节  中国剩余定理和求乘法的逆元...........................75
第七章  知识扩展
第一节  傅立叶变换与大整数的快速计算.........................81
第二节  朋友的一元三次方程根式解的研究.......................88
第三节  RSA密码体制及大整数的快速分解和快速素性测试.........90
第四节  梅森素数和费马数的密码特性等.........................95
第五节  李明波孪中猜想的证明.................................97
第八章  几个趣味问题
第一节  素数小题.............................................108
第二节  电话号码问题.........................................109
第三节  传令兵走多远等....................................... 109
第四节  勾股定理的平民证法....................................114
后记.............................................................117
附录1，素数表.....................................................119
附录2，两个可调用程序............................................127
附录3，李明波给美国人的挑战书.....................................132
个人简介.........................................................133