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
- References:
- solve doesn't solve
- From: juejung <juejung@indiana.edu>
- solve doesn't solve