Re: Writing prime factor decomposision in conventional form
- To: mathgroup at smc.vnet.net
- Subject: [mg65329] Re: [mg65320] Writing prime factor decomposision in conventional form
- From: Andrzej Kozlowski <akoz at mimuw.edu.pl>
- Date: Mon, 27 Mar 2006 06:55:55 -0500 (EST)
- References: <200603261044.FAA03868@smc.vnet.net>
- Sender: owner-wri-mathgroup at wolfram.com
On 26 Mar 2006, at 12:44, Dr. Wolfgang Hintze wrote:
>
> How can I get a conventional form output for the prime number
> decomposition, e.g. {{2,3},{5,1}} as 2^3 5 ?
>
> I have found some (rather cumbersome) method but it leaves the final
> expression in "" when I put it into input format in order to
> transfer it
> in simple text form to another application.
>
> I'm sure that there is a simple way to achieve the goal.
>
> Any idea is greatly appreciated.
>
> Regards,
> Wolfgang
>
Try this:
PrimeDecomposition[n_] := (Times @@ (
InputForm[Power[##]] & @@@ (Map[TraditionalForm, FactorInteger[n],
{2}])))
Now
PrimeDecomposition[40]
2^3 5^1
and so on. I am sure one can force first powers to be rendered as in
your post but I don't think it is worth the effort ;-)
Andrzej Kozlowski
- References:
- Writing prime factor decomposision in conventional form
- From: "Dr. Wolfgang Hintze" <weh@snafu.de>
- Writing prime factor decomposision in conventional form