Guest User

Untitled

a guest
Jan 17th, 2018
77
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 0.12 KB | None | 0 0
  1. f[x_] := x + 2^0.5*x^1.5
  2. g[x_] := InverseFunction[Composition[f, f]][x]
  3. k[x_] := x^0.5*g'[x]/g (1)
  4. Plot[k[x], {x, 0, 1}]
Add Comment
Please, Sign In to add comment