if (has_sympy()) {
x <- symbol("x")
int(1/x, x, 1, 10)
int(1/x, x, 1, 10, doit = FALSE)
int(1/x, x)
int(1/x, x, doit = FALSE)
int(exp(-x^2/2), x, -Inf, Inf)
int(exp(-x^2/2), x, -Inf, Inf, doit = FALSE)
}
Run the code above in your browser using DataLab