Plot[{Sin[x], Sin[x*0.75]}, {x, -20, 20}]