Services & Resources / Wolfram Forums
-----
 /
MathGroup Archive
1998
*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 1998

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

Search the Archive

RE: FactorInteger

  • To: mathgroup at smc.vnet.net
  • Subject: [mg14420] RE: [mg14412] FactorInteger
  • From: rgoetz at mcmail.stlcc.cc.mo.us (Goetz, Ron)
  • Date: Wed, 21 Oct 1998 03:32:17 -0400
  • Sender: owner-wri-mathgroup at wolfram.com

Alan,

Here's one trick you can use:

newFactorInteger[n_]:=
  Times @@ MapThread[ HoldForm[#1^#2]&, Transpose[ FactorInteger[n] ] ]

The only trick is that if you want to see (or use) the evaluated form of
the output, you need to use ReleaseHold.

Ron Goetz
St. Louis Community College
rgoetz at mcmail.stlcc.cc.mo.us

> -----Original Message-----
> From: awhopper at hermes.net.au [mailto:awhopper at hermes.net.au]
To: mathgroup at smc.vnet.net
> Sent: Sunday, October 18, 1998 2:10 PM
> To: mathgroup at smc.vnet.net
> Subject: [mg14420] [mg14412] FactorInteger
>
>
> Dear Math Group,
>
> Concerning the Prime Factors of composite integers ;
>
> e.g;
>
> In[1] := 2^4 3^3 4^2
>
> Out[2] = 6912
>
> In[3] := FactorInteger[%]
>
> Out[4] = {{2,4},{3,3},{4,2}}
>
> In Mathematica 3.0 is there anyway the output of FactorInteger can be
> modified to produce the unevaluated prime factors in the usual
> exponential form ?
>
> regards,
>
> Alan Hopper
> Katoomba, Australia
> awhopper at hermes.net.au
>



  • Prev by Date: Partial differential equation
  • Next by Date: Re: Triangle function
  • Previous by thread: Re: FactorInteger
  • Next by thread: Re: FactorInteger