Plot[Gamma[x], {x,-6,6}]