Solve Cubic Equation In R, Usage cubic(p) Arguments Oops.