mathematica 怎么样才能同时画三种不同的线？

"Plot[{Sin[x], Sin[2 x], Sin[3 x], Sin[4 x]}, {x, 0, 2 Pi}, 

 PlotStyle -> {Thick, Dashed, DotDashed, Dotted}]"