New answers tagged precision
2
You must set the option PrintPrecision to a higher value (The default is 6 digits).
This can be done with the Option Inspector very easily.
This can also be done programmatically :
SetOptions[SelectedNotebook[], PrintPrecision -> 16]
It works too with Style[]:
Style[N[\[Pi]], PrintPrecision -> 10]
--> 3.141592654 (instead of default 6 digits ...
3
Is SetAccuracy what you want?
a = N[10/3, {∞, 3}]
3.33
b = 3``3
3.00
a + 1
4.33
b + 1
4.00
394.985674``3
394.99
Please note Accuracy is a different concept from Precision.
3
Use the $PrePrint global parameter:
$PrePrint = If[MatchQ[#, _?NumericQ], NumberForm[#, {4, 2}], #] &;
Note: if you dont want the way rationals will be represented after setting the global variable (e.g. $3.00/4.00$) then use this instead
$PrePrint = If[MatchQ[#, Except[_Rational,_?NumericQ]], NumberForm[#, {4, 2}], #] &;
Update:
if you ...
Top 50 recent answers are included

