Guest User

Untitled

a guest
Jun 19th, 2018
62
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 0.27 KB | None | 0 0
  1. a[x_] := Exp[x];
  2. b[x_] := (a[x]/(a[x] + 1))^(1 - 3/10);
  3. Plot[b[x], {x, -3, 3}]
  4.  
  5. a[x_] := Exp[x];
  6. b[x_] := (a[x]/(a[x] + 1))^(1 - 3/10);
  7.  
  8. Plot[b[a[x]], {x, -3, 3}]
  9.  
  10. Plot[b[x], {x, -3, 3}]
  11.  
  12. ClearAll[a, b];
  13. a[x_] := Exp[x];
  14. b[x_] := (a[x]/(a[x] + 1))^(1 - 3/10);
Add Comment
Please, Sign In to add comment