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.