找回密码
 欢迎注册
楼主: wsc810

[求助] mathematica因子分解

[复制链接]
发表于 2017-5-19 16:46:21 | 显示全部楼层
mathematica 发表于 2017-5-19 08:54
54793857972933354183255135797768049007078717290211428075763521020566170435559363865495525910704581 ...

5479385797293335418325513579776804900707871729021142807576352102056617043555936386549552591070458148
最大的素数因子是
1493737023201405043207304458999135727704145956507
下面应该简单了
@wsc810
毋因群疑而阻独见  毋任己意而废人言
毋私小惠而伤大体  毋借公论以快私情
 楼主| 发表于 2017-5-19 18:20:28 | 显示全部楼层
mathematica 发表于 2017-5-19 16:46
54793857972933354183255135797768049007078717290211428075763521020566170435559363865495525910704581 ...

你是怎么得到这个最大素因子的
毋因群疑而阻独见  毋任己意而废人言
毋私小惠而伤大体  毋借公论以快私情
发表于 2017-5-22 12:16:08 | 显示全部楼层
wsc810 发表于 2017-5-19 18:20
你是怎么得到这个最大素因子的
  1. 277413784470807449561127395290909530675365613256300412407716821483617318734401448775068735859697737141
复制代码


这个整数你能分解吗?
102位十进制
毋因群疑而阻独见  毋任己意而废人言
毋私小惠而伤大体  毋借公论以快私情
 楼主| 发表于 2017-5-22 18:48:32 | 显示全部楼层
mathematica 发表于 2017-5-22 12:16
这个整数你能分解吗?
102位十进制

表示目前无力。你能用mathematica编程实现超大整数实二次域的类数计算吗,如果这一步实现了,利用连分式分解大数的方法也许可行
毋因群疑而阻独见  毋任己意而废人言
毋私小惠而伤大体  毋借公论以快私情
发表于 2017-12-18 20:12:24 | 显示全部楼层
如果只取Q[i+1]的最大素因子进行迭代,下面的代码该怎么改写
Q[i+1]=NestWhile[#/2&,Q[i+1], EvenQ];
毋因群疑而阻独见  毋任己意而废人言
毋私小惠而伤大体  毋借公论以快私情
您需要登录后才可以回帖 登录 | 欢迎注册

本版积分规则

小黑屋|手机版|数学研发网 ( 苏ICP备07505100号 )

GMT+8, 2024-11-21 20:52 , Processed in 0.024296 second(s), 15 queries .

Powered by Discuz! X3.5

© 2001-2024 Discuz! Team.

快速回复 返回顶部 返回列表