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>