       Re: Help to solve numerical equation

• To: mathgroup at smc.vnet.net
• Subject: [mg43720] Re: Help to solve numerical equation
• From: bobhanlon at aol.com (Bob Hanlon)
• Date: Thu, 2 Oct 2003 02:51:14 -0400 (EDT)
• References: <blcqh2\$p75\$1@smc.vnet.net>
• Sender: owner-wri-mathgroup at wolfram.com

```NSolve is used primarily with polynomial equations.  Use FindRoot.

eq=0.5*Exp[x*200]+0.21*Exp[x*500]+
0.1*Exp[x*110]+0.07*Exp[x*(15)]+
0.018*Exp[x*(-16)]+0.002*Exp[x*(-263)]-1;

FindRoot[eq==0,{x,.0004}]

{x -> 0.00042907}

Bob Hanlon
In article <blcqh2\$p75\$1 at smc.vnet.net>, "Raul Gomez Riera"
<raul.gomez at cigb.edu.cu> wrote:

<< I want to solve the equation below:

eq = 0.5*Exp[x*200] + 0.21*Exp[x*500] + 0.1*Exp[x*110] +
0.07*Exp[x*(15)] + 0.018*Exp[x*(-16)] + 0.002*Exp[x*(-263)] - 1

and I am try whith:

NSolve[eq == 0, x ]

but Mathematica don't get any result. We have Mathematica 4.0 on linux.

```

• Prev by Date: Re: padding in ToString
• Next by Date: Re: Help to solve numerical equation
• Previous by thread: Re: Help to solve numerical equation
• Next by thread: Re: Help to solve numerical equation