[Date Index] [Thread Index] [Author Index]

Re: Can't get Mathematica to evaluate correctly a difficult

• To: mathgroup at smc.vnet.net
• Subject: [mg111549] Re: Can't get Mathematica to evaluate correctly a difficult
• From: Peter Pein <petsie at dordos.net>
• Date: Wed, 4 Aug 2010 07:51:12 -0400 (EDT)
• References: <i3bd7l$pjr$1@smc.vnet.net>

Am Wed, 4 Aug 2010 09:51:49 +0000 (UTC)
schrieb Damien Wyart <damien.wyart at free.fr>:

> Hello,
> 
> I am using Mathematica 7.0.2 and playing a bit with an expression
> analyzed in the following paper:
> http://www.loria.fr/~zimmerma/papers/cise.pdf
> 
> I tried many constructions with N and SetPrecision and can't get
> Mathematica to output the correct result (I am not very experienced
> with Mathematica). Here is the expression :
> 
> 173746*Sin[10^22]+94228*Log[17.1]-78487*Exp[0.42]
> 
> The correct result should be -1.341818958*10^-12 but even forcing each
> term with N and a very large number, I am still not getting this value
> at all.
> 
> 
> Any help will be appreciated. Thanks in advance ; best regards,
> 

Hi Damien,

use exact input and then evaluate with a precision greater than 22 :

In[14]:= N[173746*Sin[10^22]+94228*Log[171/10]-78487*Exp[21/50],30]
Out[14]= -1.34181895782961954970427868423*10^-12

or change the precision of the input:

In[15]:= 173746*Sin[10^22]+94228*Log[17.1`30]-78487*Exp[0.42`30]
Out[15]= -1.341818957830*10^-12

Peter