Darstellung der Funktion mit y=z=2x :

Plot[4 x + (1/x), {x, 0, 1}, ImageSize -> 550]

D[4 x + (1/x), x]

Solve[4 - (1/(x^2)) == 0]