Get the 'SymPy' object. Note that it gives you extra responsibilities when you choose to access the 'SymPy' object directly.
get_sympy()
The 'SymPy' object with direct access to the library.
if (has_sympy()) {
sympy <- get_sympy()
sympy$solve("x**2-1", "x")
}
#> [[1]]
#> -1
#>
#> [[2]]
#> 1
#>