Re: solving non-algebraic exponential equations
- To: mathgroup at smc.vnet.net
- Subject: [mg38133] Re: [mg38059] solving non-algebraic exponential equations
- From: "milkcart" <milkcart at m17.alpha-net.ne.jp>
- Date: Tue, 3 Dec 2002 04:34:26 -0500 (EST)
- References: <200211281908.OAA23991@smc.vnet.net>
- Sender: owner-wri-mathgroup at wolfram.com
You can use FindRoot after plotting the graph of your equation.
For example
Plot[Exp[-Pi*0.5/x] + Exp[-Pi*3.0/x], {x, 0, 10}]
FindRoot[Exp[-Pi*0.5/x] + Exp[-Pi*3.0/x] == 1, {x, 2}]
> NSolve[Exp[-Pi*a/x] + Exp[-Pi*b/x] == 1, x]
>However, Mathematica is unable to compute the
> solution for non-integer values of a and b (e.g. a=1.1, b=1.1; even
> a=1.0, b=1.0 doesn't work). Instead, the error message "Solve::"tdep":
> "The equations appear to involve the variables to be solved for in an
> essentially non-algebraic way." is produced.
**************
milkcart