s[x_,t_]=Cos[x-4t]+Cos[2 (x-5t)]

Plot[{s[x,0],s[x,.1]},{x,-10,10}]

Plot[s[x,.7],{x,-10,10}]

Plot[s[x,1.3],{x,-10,10}]