用Mathematica画x=1的图形