Mathematica 9 is now available
Services & Resources / Wolfram Forums
-----
 /
MathGroup Archive
2006
*January
*February
*March
*April
*May
*June
*July
*August
*September
*October
*November
*December
*Archive Index
*Ask about this page
*Print this page
*Give us feedback
*Sign up for the Wolfram Insider

MathGroup Archive 2006

[Date Index] [Thread Index] [Author Index]

Search the Archive

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


  • Prev by Date: Re: Writing prime factor decomposision in conventional form
  • Next by Date: Re: Plot equations and inequalities together
  • Previous by thread: Re: Writing prime factor decomposision in conventional form
  • Next by thread: Re: Writing prime factor decomposision in conventional form