Plot[(4/π) Sin[x] + (4/(3  π)) 
            Sin[3  x], {x, -2 π, 2  π}, 
        PlotStyle  ->  RGBColor[1, 0, 0]];