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.