Plot[{x, Tan[x]}, {x, -2 Pi, 2 Pi}]