improve presentation with Mathematica