plot(expr, n=1e04, exclude=[0])
# Expected:
## Plot object containing:
## [0]: cartesian line: (sin(1 - 1/cos(x)) + Abs(x) - 6)*sign(x) for x over (-10, 10)