2.2 例1: 普通の関数らしい使い方

関数 $f(x)=4x^3-8x^2-4x+9$ の増減を調べよう。

f[x_]:=4x^3-8x^2-4x+9
Plot[f[x],{x,-4,4}]
Solve[f[x]==0,x]
N[%,20]
sp=Solve[f'[x]==0,x]
f[x] /. sp
Simplify[%]
Remove[f,sp]

(2変数関数の増減を調べるのは研究課題としたい。 http://nalab.mind.meiji.ac.jp/~mk/syori2-2005/mathematica/ の付録にプログラム例がある)