Plot[(1 + 1/n)^n, {n, -6, 6}, AxesOrigin -> {0, 0}]
2.y=sin cx
Manipulate[Plot[Sin[c x], {x, -Pi, Pi}], {c, 1, 6}]
直接把語句復制到Mathematica上,按下Shift+Enter就行了,繪圖範圍可以自己修改