Plot[{f[0.5,2,1,1,x],f[0.25,1.75,1,1,x],f[1,1.5,1,1,x]},{x,-5,5},PlotRange->All,FrameTrue,FrameLabel{"x","P(x,t)"},FrameStyle(FontFamily"Helvetica"),LabelStyle(FontSize12),PlotStyle{Black,{Black,Dashing[{Large,Medium}]},{Black,Dashing[{0,Small,Large,Small}]}}]