Re: How to get 2.334E+6 output form ?

• To: mathgroup at smc.vnet.net
• Subject: [mg5631] Re: How to get 2.334E+6 output form ?
• From: dendzik at usctoux1.cto.us.edu.pl (Zbigniew Dendzik)
• Date: Wed, 1 Jan 1997 21:04:58 -0500
• Organization: Silesian University, Katowice, Poland
• Sender: owner-wri-mathgroup at wolfram.com

```Sergio Rojas (sergio at scisun.sci.ccny.cuny.edu) wrote:

(...)
: How can one tell to Mathematica to write
:                                                                   6
: numbers in the form 2.3456E+6 instead of 2.3456*10^6 (or 2.3456 10 ).

(...)
:  How the data can be written to a file without the braces and comma in
: between?

(...)

Hi Sergio,

Below is a simple piece of Mma code which I have written to solve this
problem.

RegularForm[x_]:= OutputForm[NumberForm[TableForm[x//N], ExponentFunction->
(If[-10<#<10, Null, #]&), NumberFormat->(If[#3=="", SequenceForm[#1, #3],
SequenceForm[#1, "E", #3]]&)]]

If you put the above definition into the file named user.m (for example,

In[1]:= << user.m

In[2]:= x=Table[(-1^i)*4.6^(i-j*10), {i, 1, 4}, {j, 1, 3}];

In[3]:= RegularForm[x] >> foo

In[4]:= !! foo
-0.00000108438   -2.55624E-13   -6.02591E-20

-0.00000498813   -1.17587E-12   -2.77192E-19

-0.0000229454    -5.409E-12     -1.27508E-18

-0.000105549     -2.48814E-11   -5.86538E-18

I hope it helps. Happy New Year to you and to all mathgroupers.

--Zbigniew Dendzik
dendzik at us.edu.pl

```

• Prev by Date: Re: DeclarePackage in Mathematica 2.2 for Windows
• Next by Date: Re: My keyboard mapping has gone TILT with mathematica 3.0 on my PC
• Previous by thread: Re: DeclarePackage in Mathematica 2.2 for Windows
• Next by thread: Re: How to get 2.334E+6 output form ?