> with(plots):

Warning, the name changecoords has been redefined

> f := (x,y) -> 2*x*y^2/(x^2+y^4);

f := proc (x, y) options operator, arrow; 2*x*y^2/(x^2+y^4) end proc

> plot3d([x,y,f(x,y)], x=-4..4, y=-4..4, style=patchcontour, axes=normal, grid=[50,50], projection=.9); Plotter grafen. Bruker option "grid=[50,50]" for å oppnå bedre nøyaktighet.

[Plot]

> contourplot3d(f(x,y), x=-4..4, y=-4..4, filled=true, axes=normal, grid=[50,50], projection=.9); Alternativ måte å plotte grafen på.

[Plot]

> contourplot(f(x,y), x=-4..4, y=-4..4, filled=true, grid=[50,50]); Lager nivåkurveplot.

[Plot]

Ser ut som nivåkurvene er parabler. Prøver å evaluere funksjonen langs parabelen x = y^2 og langs x-aksen. Parametriserer disse, med parameter t.

> f(t^2,t);

1

Det følger at grenseverdien i origo, når vi nærmer oss langs parabelen, er lik 1.

Sjekker langs x-aksen:

> f(t,0);

0

>

Altså: Grenseverdien i origo, når vi nærmer oss langs x-aksen, er lik 0.