Plot[Abs[Sqrt[3] Sin[x] - Cos[x]], {x, 0, 5 Pi}]