Re: Solving simple equations
- To: mathgroup at smc.vnet.net
- Subject: [mg122718] Re: [mg122681] Solving simple equations
- From: Alexei Boulbitch <Alexei.Boulbitch at iee.lu>
- Date: Mon, 7 Nov 2011 05:53:49 -0500 (EST)
- Delivered-to: l-mathgroup@mail-archive0.wolfram.com
Hi, Mathieu,
You are right, it cannot solve it in its present form. But one can help Mathematica a bit like follows:
This is your equation:
eq1 = (A*n^a)^b/n == c
Its lhp is eq[[1]]. Let us map the PowerExpand onto the lhp:
eq2 = MapAt[PowerExpand, eq1, {1}]
and then solve this latter equation:
Solve[eq2,n]
This solves the equation, though you get a warning message.
Hope it helps. Have fun.
Mathematica seems to struggle with very simple equations:
Solve[(A*n^a)^b/n == c, n]
Solve::nsmet: This system cannot be solved with the methods available
to Solve
Reduce doesn't work either. Even if I add assumptions:
Assuming[A > 0 && 1 > a > 0 && 1 > b > 0 && c > 0 && n > 0, Solve[(A
n^a)^b/n == c, n]]
Solve::nsmet: This system cannot be solved with the methods available
to Solve. >>
Is there a way for Mathematica to solve these equations?
Many thanks,
Mathieu
Alexei BOULBITCH, Dr., habil.
IEE S.A.
ZAE Weiergewan,
11, rue Edmond Reuter,
L-5326 Contern, LUXEMBOURG
Office phone : +352-2454-2566
Office fax: +352-2454-3566
mobile phone: +49 151 52 40 66 44
e-mail: alexei.boulbitch at iee.lu<mailto:alexei.boulbitch at iee.lu>