Mathematica Data Analysis