- 注册时间
- 2021-11-19
- 最后登录
- 1970-1-1
- 威望
- 星
- 金币
- 枚
- 贡献
- 分
- 经验
- 点
- 鲜花
- 朵
- 魅力
- 点
- 上传
- 次
- 下载
- 次
- 积分
- 8646
- 在线时间
- 小时
|
马上注册,结交更多好友,享用更多功能,让你轻松玩转社区。
您需要 登录 才可以下载或查看,没有账号?欢迎注册
×
BPSW算法中,选择d=5,-7,9,-11,13,-15,17,-19,21,-23,25...从这个数列中选择第一个雅克比符号等于-1的d,d相对于n的雅克比符号
n=145823#+1(63142位大整数)
其中8#+1=7*5*3*2+1,其中8#表示小于等于8的所有的素数的乘积,
- Clear["Global`*"];
- m=145823;
- n=Times@@Prime@Range@PrimePi[m]+1;(*小于等于m以下的所有的素数的乘积*)
- d=5;(*初始判别式的值*)
- c=1;(*统计次数,第几个判别式的值*)
- Do[js=JacobiSymbol[d,n];(*计算雅克比符号*)
- If[js==-1,Print[{d,(1-d)/4,c}];Break[]];(*如果雅克比符号等于-1,则输出相关结果*)
- If[d>0,d=(-1)*d-2,d=(-1)*d+2];(*不等于-1的处理办法*)
- c=c+1,(*增加1*)
- {k,1,10^6}]
复制代码
运算结果:
{145829,-36457,72913}
此处,145829似乎是145823的下一个素数。
此处两个提问:
1、为什么雅克比符号运算了那么多次?
2、145829似乎是145823的下一个素数,这种情况是偶然的,还是必然的?如果是必然的,那么怎么证明?
|
|