Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- logf[x_, a_, b_] := Log[a*x/(1 - b*x)]
- With[{a = 1},
- Plot3D[logf[x, a, b], {x, 0, 1}, {b, 0, 1},
- ClippingStyle -> None,
- PlotPoints -> 100]]
- D[logf[x, a, b], x] // Simplify
- Plot3D[1/(x - b*x^2), {x, 0, 1}, {b, 0, 1},
- ClippingStyle -> None]
- D[logf[x, a, b], {x, 2}] // Simplify
- Plot3D[(-1 + 2*b*x)/(x^2*(-1 + b*x)^2), {x, 0, 1}, {b, 0, 1},
- ClippingStyle -> None,
- PlotPoints -> 100]
Add Comment
Please, Sign In to add comment