How To Give Constatn Value In Plot In Mathematica