Mathematica for Microeconomics