Re: solving non-algebraic exponential equations
- To: mathgroup at smc.vnet.net
- Subject: [mg38086] Re: solving non-algebraic exponential equations
- From: Jens-Peer Kuska <kuska at informatik.uni-leipzig.de>
- Date: Tue, 3 Dec 2002 04:29:05 -0500 (EST)
- Organization: Universitaet Leipzig
- References: <as5q8h$nin$1@smc.vnet.net>
- Reply-to: kuska at informatik.uni-leipzig.de
- Sender: owner-wri-mathgroup at wolfram.com
Hi,
what ist with
With[{a = 1.1, b = 1.0},
FindRoot[Exp[-Pi*a/x] + Exp[-Pi*b/x] == 1, {x, 1}]
]
Regards
Jens
Eva Hohberger wrote:
>
> I am trying to solve the following equation for given values of two
> parameters a and b:
>
> NSolve[Exp[-Pi*a/x] + Exp[-Pi*b/x] == 1, x]
>
> This is straightforward for integer values of the parameters a and b
> (e.g. a=1, b=1). 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.
>
> Can anybody point out a way to overcome this problem and to obtain a
> solution?
>
> Thanks,
> Eva