Solve Quadratic Equations with R