graphics(
    line(x, (x, -3, 3)),
    line(log(x), (x, -3, 3), rendering_kw={"linestyle": "--"}),
    line(exp(x), (x, -3, 3), rendering_kw={"linestyle": ":"}),
    aspect="equal", ylim=(-3, 3)
)
# Expected:
## Plot object containing:
## [0]: cartesian line: x for x over (-3.0, 3.0)
## [1]: cartesian line: log(x) for x over (-3.0, 3.0)
## [2]: cartesian line: exp(x) for x over (-3.0, 3.0)