找回密码
 欢迎注册
查看: 13013|回复: 3

[求助] Mathematica 给出一个奇怪的结果,求解释。

[复制链接]
发表于 2021-2-10 22:15:59 | 显示全部楼层 |阅读模式

马上注册,结交更多好友,享用更多功能,让你轻松玩转社区。

您需要 登录 才可以下载或查看,没有账号?欢迎注册

×
本意是使用 Mathematica 求解最小的有理数 q/p,使得 q/p 比 355/113 更接近 \(\pi\),
先是用 Minimize[{p, Abs[q/p - Pi] < Abs[355/113 - Pi] && p > 1 && q > 1 && Element[p | q, Integers]}, {p, q}],没有结果。

接着用如下的命令:Simplify@Minimize[{p, Abs[q/p - Pi] < Abs[355/113 - Pi] && p > 1 && q > 1 && Element[p | q, Integers]}, {p, q}]
Mathematica 给出如下结果:
{2, {p -> 2, q -> 2}}
{2, {p -> 2, q -> 8}}

求助专家解释,感激不尽。
2021-02-10_221537.png
毋因群疑而阻独见  毋任己意而废人言
毋私小惠而伤大体  毋借公论以快私情
发表于 2021-2-11 11:57:50 | 显示全部楼层
应该是pq都是整数,你搞成了或是整数
毋因群疑而阻独见  毋任己意而废人言
毋私小惠而伤大体  毋借公论以快私情
发表于 2021-2-12 10:48:51 | 显示全部楼层
本帖最后由 TSC999 于 2021-2-12 10:50 编辑
  1. FromContinuedFraction[ContinuedFraction[\[Pi], 4]]
  2. FromContinuedFraction[ContinuedFraction[\[Pi], 5]]
复制代码

比 355/113 更接近 Pi 的下一个最小分数,只能是 103993/33102。

点评

连分数保证分子比它小的它为最佳,比它大的就不好说了。实际上 33102 不是最小的,可参见:http://www.mathchina.com/bbs/forum.php?mod=viewthread&tid=2044920  发表于 2021-2-12 12:29
毋因群疑而阻独见  毋任己意而废人言
毋私小惠而伤大体  毋借公论以快私情
您需要登录后才可以回帖 登录 | 欢迎注册

本版积分规则

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

GMT+8, 2024-4-19 16:35 , Processed in 0.066417 second(s), 20 queries .

Powered by Discuz! X3.5

© 2001-2024 Discuz! Team.

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