       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:

eq1 = (A*n^a)^b/n == c

Its lhp is eq[]. 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>

```

• Prev by Date: Re: Solving simple equations
• Next by Date: Parellel Evaluation of Dynamic Content Within Dynamic Module
• Previous by thread: Re: Solving simple equations
• Next by thread: Part // interesting undocumented feature