Applied Mathematica: Getting Started, Getting It Done