RE: Number of digits

*To*: mathgroup at smc.vnet.net*Subject*: [mg73942] RE: Number of digits*From*: Robert Pigeon <robert.pigeon at videotron.ca>*Date*: Sat, 3 Mar 2007 01:14:03 -0500 (EST)*Reply-to*: robert.pigeon at videotron.ca

Many thanks !!! Exactly what I was looking for. Merci ! Robert Robert Pigeon TZ = -5 -----Message d'origine----- De : Jean-Marc Gulliet [mailto:jeanmarc.gulliet at gmail.com] Envoy=C3=A9 : Friday, March 02, 2007 07:55 =C3=80 : robert.pigeon at videotron.ca; mathgroup at smc.vnet.net Objet : Re: Number of digits Robert Pigeon wrote: > Good afternoon, > How can I force Mathematica to output an answer with a certain number of > significant digits ? What I mean is I want the answer of, let say, 1.0 / 3 > to be output in Mathematica as 0.33 for example. The reason I want to do > that is that I am making a table (using TableForm) of a list of answers to > use in a report. I do not want to see 0.33333 in the table just 0.33 ! > I could use SetPrecision[1./3, 2], but I do not want to do that for every > calculation. I have looked at $MachinePrecision and all other $.... , but I > cannot make sense out of it. > So what I am trying to do, in a nut shell, is do what can be done with a > pocket calculator, set my "visible" answer with a certain number of digits! > > Thanks, > > Robert > > Robert Pigeon > TZ = -5 > > > Use NumberForm to control the display of numbers. In[1]:= NumberForm[x, {3, 2}, NumberPadding -> {"", "0"}] /. x -> 0.123456 Out[1]//NumberForm= 0.12 If you want this by default (rather that 6 decimal digits), you can set the $Post variable as in In[2]:= $Post = NumberForm[#1, {3, 2}, NumberPadding -> {"", "0"}] & Out[2]//NumberForm= Slot[1.00]& In[3]:= 12.1234 Out[3]//NumberForm= 12.10 Regards, Jean-Marc