MathGroup Archive 2003

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

Search the Archive

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