Export["graph.eps",Plot[Sin[x],{x,0,2Pi}]]