Numerical and analytical methods for scientists and engineers using mathematica