Re: solve doesn't solve

• To: mathgroup at smc.vnet.net
• Subject: [mg54287] Re: [mg54265] solve doesn't solve
• From: DrBob <drbob at bigfoot.com>
• Date: Wed, 16 Feb 2005 14:36:05 -0500 (EST)
• References: <200502150251.VAA27363@smc.vnet.net>
• Reply-to: drbob at bigfoot.com
• Sender: owner-wri-mathgroup at wolfram.com

```((-(-1 + b))*R*beta)/(a - (-1 + b)*R*s)^sigma ==
(-s + w - w*tau)^(-sigma);
(Log[#1/(a - (-1 + b)*R*s)^(-sigma)] & ) /@ %;
PowerExpand[%];
Solve[%, s]

{{s -> (-a + (1 - b)^(1/sigma)*
beta^(1/sigma)*
R^(1/sigma)*w -
(1 - b)^(1/sigma)*
beta^(1/sigma)*
R^(1/sigma)*tau*w)/
(R - b*R +
(1 - b)^(1/sigma)*
beta^(1/sigma)*
R^(1/sigma))}}

Bobby

On Mon, 14 Feb 2005 21:51:13 -0500 (EST), juejung <juejung at indiana.edu> wrote:

> hi,
>
> can anybody solve the following equation for variable s with Mathematica?
>
> ((-(-1 + b))*R*beta)/(a - (-1 + b)*R*s)^sigma - (-s + w -
> w*tau)^(-sigma)==0
>
> Solve doesn't work. I get this annoying error message.
>
> Solve::tdep: The equations appear to involve the variables to be solved for
> in an essentially non-algebraic way.
>
> I would like to get analytical solutions (numerical is not problem) to
> problems like this one.I know this one's easy done by hand but I have more
> cumbersome ones to deal with.
> Is there a package out there that can solve this analytically, or is this
> just impossible on computers?
>
> Thanks a lot.
>
> Juergen

--
DrBob at bigfoot.com
www.eclecticdreams.net

```

• Prev by Date: [no subject]
• Next by Date: Re: Axes in ShowGraph
• Previous by thread: Re: solve doesn't solve
• Next by thread: Re: solve doesn't solve