This is documentation for Mathematica 4, which was
based on an earlier version of the Wolfram Language.
Wolfram Research, Inc.

2.8.7 Output Formats for Numbers

Output formats for numbers.

These numbers are given in the default output format. Large numbers are given in scientific notation.

In[1]:= {6.7^-4, 6.7^6, 6.7^8}

Out[1]=

This gives all numbers in scientific notation.

In[2]:= ScientificForm[%]

Out[2]//ScientificForm=

This gives the numbers in engineering notation, with exponents arranged to be multiples of three.

In[3]:= EngineeringForm[%]

Out[3]//EngineeringForm=

In accounting form, negative numbers are given in parentheses, and scientific notation is never used.

In[4]:= AccountingForm[{5.6, -6.7, 10.^7}]

Out[4]//AccountingForm=

Controlling the printed precision of real numbers.

Here is to 30 decimal places.

In[5]:= N[Pi^9, 30]

Out[5]=

This prints just 10 digits of .

In[6]:= NumberForm[%, 10]

Out[6]//NumberForm=

This gives 12 digits, in engineering notation.

In[7]:= EngineeringForm[%, 12]

Out[7]//EngineeringForm=

Options for number formatting.

All the options in the table except the last one apply to both integers and approximate real numbers.

All the options can be used in any of the functions NumberForm, ScientificForm, EngineeringForm and AccountingForm. In fact, you can in principle reproduce the behavior of any one of these functions simply by giving appropriate option settings in one of the others. The default option settings listed in the table are those for NumberForm.

Setting DigitBlock->n breaks digits into blocks of length n.

In[8]:= NumberForm[30!, DigitBlock->3]

Out[8]//NumberForm=

You can specify any string to use as a separator between blocks of digits.

In[9]:= NumberForm[30!, DigitBlock->5, NumberSeparator->" "]

Out[9]//NumberForm=

This gives an explicit plus sign for positive numbers, and uses | in place of a decimal point.

In[10]:= NumberForm[{4.5, -6.8}, NumberSigns->{"-", "+"},

NumberPoint->"|"]

Out[10]//NumberForm=

When Mathematica prints an approximate real number, it has to choose whether scientific notation should be used, and if so, how many digits should appear to the left of the decimal point. What Mathematica does is first to find out what the exponent would be if scientific notation were used, and one digit were given to the left of the decimal point. Then it takes this exponent, and applies any function given as the setting for the option ExponentFunction. This function should return the actual exponent to be used, or Null if scientific notation should not be used.

The default is to use scientific notation for all numbers with exponents outside the range to 5.

In[11]:= {8.^5, 11.^7, 13.^9}

Out[11]=

This uses scientific notation only for numbers with exponents of 10 or more.

In[12]:= NumberForm[%,

ExponentFunction -> (If[-10 < # < 10, Null, #]&)]

Out[12]//NumberForm=

This forces all exponents to be multiples of 3.

In[13]:= NumberForm[%, ExponentFunction -> (3 Quotient[#, 3]&)]

Out[13]//NumberForm=

Having determined what the mantissa and exponent for a number should be, the final step is to assemble these into the object to print. The option NumberFormat allows you to give an arbitrary function which specifies the print form for the number. The function takes as arguments three strings: the mantissa, the base, and the exponent for the number. If there is no exponent, it is given as "".

This gives the exponents in Fortran-like "e" format.

In[14]:= NumberForm[{5.6^10, 7.8^20},

NumberFormat -> (SequenceForm[#1, "e", #3]&) ]

Out[14]//NumberForm=

You can use FortranForm to print individual numbers in Fortran format.

In[15]:= FortranForm[7.8^20]

Out[15]//FortranForm= 6.948515870862152e17

Controlling the alignment of numbers in output.

Whenever you print a collection of numbers in a column or some other definite arrangement, you typically need to be able to align the numbers in a definite way. Usually you want all the numbers to be set up so that the digit corresponding to a particular power of 10 always appears at the same position within the region used to print a number.

You can change the positions of digits in the printed form of a number by "padding" it in various ways. You can pad on the right, typically adding zeros somewhere after the decimal. Or you can pad on the left, typically inserting spaces in place of leading zeros.

This pads with spaces to make room for up to 7 digits in each integer.

This creates a column of integers.

This prints each number with room for a total of 7 digits, and with 4 digits to the right of the decimal point.

In[18]:= PaddedForm[{-6.7, 6.888, 6.99999}, {7, 4}]

In NumberForm, the 7 specifies the maximum precision, but does not make Mathematica pad with spaces.

In[19]:= NumberForm[{-6.7, 6.888, 6.99999}, {7, 4}]

Out[19]//NumberForm=

If you set the option SignPadding-> True, Mathematica will insert leading spaces after the sign.

In[20]:= PaddedForm[{-6.7, 6.888, 6.99999}, {7, 4},

Only the mantissa portion is aligned when scientific notation is used.

ColumnForm[{6.7 10^8, 48.7, -2.3 10^-16}], {4, 2}]

With the default setting for the option NumberPadding, both NumberForm and PaddedForm insert trailing zeros when they pad a number on the right. You can use spaces for padding on both the left and the right by setting NumberPadding -> {" ", " "}.

In[22]:= PaddedForm[{-6.7, 6.888, 6.99999}, {7, 4},

NumberPadding -> {" ", " "}]

Printing numbers in other bases.

This prints a number in base 2.

In[23]:= BaseForm[2342424, 2]

Out[23]//BaseForm=

In bases higher than 10, letters are used for the extra digits.

In[24]:= BaseForm[242345341, 16]

Out[24]//BaseForm=

BaseForm also works with approximate real numbers.

In[25]:= BaseForm[2.3, 2]

Out[25]//BaseForm=

You can even use BaseForm for numbers printed in scientific notation.

In[26]:= BaseForm[2.3 10^8, 2]

Out[26]//BaseForm=

Section 3.1.3 discusses how to enter numbers in arbitrary bases, and also how to get lists of the digits in a number.