Plot[x*Sqrt[(4-x)/(4+x)],{x,-1,4}]