怎么用Mathematica调整数字的输出精度

怎么用Mathematica调整数字的输出精度

有时候，一些没办法给出准确数值的数字，只能控制输出精度，使之变成“数值解”。

下面介绍一下Mathematica怎么控制数值的输出精度。

把一个小数的小数点后面的位数补充到20位，不足的用0顶位。

1/3``20

0.3``20

Pi``20

这个代码不执行，说明对于特定常数不实用。

那么怎么求出Pi的100位精度呢：

N[Pi,100]

用Accuracy给出数字的精度：

Accuracy [N[Pi,100] ]Accuracy [Pi]

对于正整数和特定的符号常数，精度都是无限大，而对于小数就不会这样:

Accuracy [E ]Accuracy [3 ]Accuracy [3.]Accuracy [3.``20]

不过，Accuracy[3.]的结果为什么是15.4775？

Table[Accuracy [N[Pi,n]],{n,1,10,1}]

FindRoot[x-Sqrt,{x,1}, WorkingPrecision -> 60]N[Sqrt,60]

这是两种把Sqrt的精度提高到60的方法，结果的精度完全一样。

计算椭圆{3 Cos[x],2 Sin[x]}的周长：

N[ArcLength[{3 Cos[x],2 Sin[x]},{x,0,2 Pi}],100]