plot(expr, ylim=(-10, 10))
# Expected:
## Plot object containing:
## [0]: cartesian line: x/8 + tan(floor(30*x)) for x over (-10, 10)