Re: ExponentFunction

• To: mathgroup at smc.vnet.net
• Subject: [mg24491] Re: ExponentFunction
• From: "Hans Michel" <hans at dorsai.org>
• Date: Thu, 20 Jul 2000 03:01:36 -0400 (EDT)
• Organization: Michel Information Services
• References: <8l0sh6\$ehb@smc.vnet.net>
• Sender: owner-wri-mathgroup at wolfram.com

```Greg:

I wish to give pointers to your PS it was more interesting.

These are quick thoughts.
Take the output from FactorInteger[]  a list {{,},{,}...}, perform some
function to get the list in the form for example {2,2,2,37,...} (get the
exponents out) Flatten, the use the Infix function.

Infix[list, "."]

I don't think this is the best way. But this is what pops to mind

Hans
Greg Keogh <greg at mira.net> wrote in message news:8l0sh6\$ehb at smc.vnet.net...
> Hello from Melbourne Australia,
>
> After searching the V4 help for about 15 solid minutes I eventually found
a
> way of printing approximate real numbers in "plain" form without
exponents.
> This works okay:
>
> ExponentFunction -> (If[Abs[#] < 100, Null, #] &)
>
> However, if I take a blanket approach without the pure function and use:
>
> ExponentFunction -> (Null)
>
> Then I get
>
> NumberForm::expint: Result Null[12] obtained by applying the value of the
> ExponentFunction option to 12 should be an integer or Null.
>
> Can someome explain why my attempt to use Null is being rejected? What's
the
> correct way?
>
> Cheers,
> Greg Keogh
>
> ---------
> Ps. I just thought of another quick question I'd like to throw in while
I'm
> in the newsreader: I'm having trouble composing an elegant functional way
of
> converting the results of FactorInteger into a form where all the factors
> (with multiples) are strung together dot separated (example
> 2.2.2.3.3.43.1181). Any ideas?
>
>
>

```

• Prev by Date: Mathematica 3.0: reliability close to LogZero?
• Next by Date: Re: Newbie
• Previous by thread: Re: ExponentFunction
• Next by thread: Re: ExponentFunction