Sparse Estimation with Math and R