| Author |
Comment/Response |
Thomas Schmelzer
|
 03/16/05 05:53am
Hi,
I have a list of numbers (coefficents of a polynomial of degree 14). However Mathematica refuses to store them accurate. What should I do?
Thomas
In[57]:=
P:=SetPrecision[{9.999999999999817*10^-1,
2.7495604296300042*10^-1,
3.4346984175671476*10^-2,
2.5674439819028616*10^-3,
1.2734070715233181*10^-4,
4.3932808492511235*10^-6,
1.0753202054485227*10^-7,
1.8710255961089453*10^-9,
2.2849515767300157*10^-11,
1.9038640942835345*10^-13,
1.0310151365350495*10^-15,
3.3490280333667535*10^-18,
5.67438255395235*10^-21,
3.7794523874503296*10^-24,
4.160982664237661*10^-28},20]
In[59]:=
p[[3]]
Out[59]=
0.034347
I need more digits here...
URL: , |
|
