Tag Info

New answers tagged

0

Using this nice method by MrWizard Global precision setting you can try $PreRead = (# /. s_String /; StringMatchQ[s, NumberString] && Precision@ToExpression@s == MachinePrecision :> s <> "`4." &); a = Table[0, {10}]; a[[1]] = 0.1834562432; Do[ a[[n]] = 1/n - 5 a[[n - 1]], {n, 2, 10} ]; and now a {0.1834562432`4., ...



Top 50 recent answers are included