Re: Automatic expansion of Log[a^n] for a,n explicit positive integers?
- To: mathgroup at smc.vnet.net
- Subject: [mg28229] Re: [mg28180] Automatic expansion of Log[a^n] for a,n explicit positive integers?
- From: Tomas Garza <tgarza01 at prodigy.net.mx>
- Date: Thu, 5 Apr 2001 03:00:44 -0400 (EDT)
- References: <200104030637.CAA20052@smc.vnet.net>
- Sender: owner-wri-mathgroup at wolfram.com
If you are only concerned about powers of 2, then you may define the
functiion lg and use it always instead of Log:
In[1]:=
lg[n_] := If[Mod[n, 2] == 0, IntegerExponent[n, 2]*Log[2], Log[n]]
Then, e.g.,
In[1]:=
{lg[2], lg[4], lg[8], lg[16], lg[32], lg[3]}
Out[1]=
{Log[2], 2 Log[2], 3 Log[2], 4 Log[2], 5 Log[2], Log[3]}
Tomas Garza
Mexico City
----- Original Message -----
From: "Harald Anlauf" <anlauf at hep.tu-darmstadt.de>
To: mathgroup at smc.vnet.net
Subject: [mg28229] [mg28180] Automatic expansion of Log[a^n] for a,n explicit positive
integers?
> Hi,
>
> is there a way to force Mathematica 4.0 to always expand expressions like
>
> Log[4], Log[8], Log[16], etc. to 2*Log[2] etc.
>
> automatically?
>
> It is very annoying to have such logarithms expanded manually each
> time they pop up again...
>
> PowerExpand[] apparently does not help/work.
>
> --
> Ciao,
> -ha
>
- References:
- Automatic expansion of Log[a^n] for a, n explicit positive integers?
- From: Harald Anlauf <anlauf@hep.tu-darmstadt.de>
- Automatic expansion of Log[a^n] for a, n explicit positive integers?