User Portlet User Portlet

Discussions
Jim thank you very much. I actually refreshed and after changing the code it worked. Also appreciate the Mathematica code that works too!
Rounding to arbitrary leading digits. Not the most elegant solution but does the trick In[1]:= leadRound[n_, l_ : 2] := Round[n, 10^(Length[IntegerDigits[n]] - l)] In[2]:= leadRound[56789012] leadRound[56789012, 2] ...