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>