7.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変数関数の増減を調べるのは研究課題としたい。 付録 B.2 にプログラム例がある。)