Stata Sign Function Mathematica