Re: Writing prime factor decomposision in conventional form
- To: mathgroup at smc.vnet.net
- Subject: [mg65328] Re: [mg65320] Writing prime factor decomposision in conventional form
- From: Selwyn Hollis <sh2.7183 at earthlink.net>
- Date: Mon, 27 Mar 2006 06:55:53 -0500 (EST)
- References: <200603261044.FAA03868@smc.vnet.net>
- Sender: owner-wri-mathgroup at wolfram.com
On Mar 26, 2006, at 5:44 AM, 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
>
Wolfgang,
Try this:
PrimeFactorization[i_Integer] :=
With[{q = Apply[HoldForm[#1^#2]&,#]& /@
FactorInteger[i]}, Times @@ q]
PrimeFactorization[3104248]
ReleaseHold[%]
Regards,
Selwyn Hollis
- References:
- Writing prime factor decomposision in conventional form
- From: "Dr. Wolfgang Hintze" <weh@snafu.de>
- Writing prime factor decomposision in conventional form