Fichiers Sage
var('x, y') f(x,y) = x^3-3*x+3*x*y^2 show(f)
%md # Recherche des points critiques et des valeurs extrêmes
gradf = f.gradient() show(gradf)
eq1 = gradf[0](x,y) == 0 eq2 = gradf[1](x,y) == 0 show(eq1) show(eq2)
pcrit = solve([eq1, eq2], (x,y)) show(pcrit)
hessf = f.hessian() show(hessf(x,y))
%md # Graphique
r = 2 G = plot3d(f(x,y), (x, -r, r), (y, -r, r), plot_points=15, color='orange', mesh=1, opacity=.7) p = 10 G += points((1,0), color='red', pointsize=p) G += points((-1,0), color='blue', pointsize=p) G += points((0,-1), color='green', pointsize=p) G += points((0,1), color='green', pointsize=p) show(G)
show(G, aspect_ratio=[5, 5, 1])