Plot[{Sin[x], Sin[2 x], Sin[3 x], Sin[4 x]}, {x, 0, 2 Pi},
PlotStyle -> {Thick, Dashed, DotDashed, Dotted}]
